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FOREWORD 



This manual explains the Van an Omnitask Real-Time 
Executive (VORTEX) and its use, but it is not intended for 
a beginning audience. Prerequisite to an understanding of 
this manual is a knowledge of general programming 
concepts, and preferably some Varian Data Machines 620 
series or V70 series computer system is desirable. 



NOTATION IN THIS MANUAL 



In the directive formats given in this manual: 

* Boldface type indicates an obligatory parameter 

* Italic type indicates an optional parameter. 

• Upper case type indicates that the parameter is to be 
entered exactly as written 

• Lower case type indicates a variable and shows where 
the user is to enter a legal value for that variable. 

a(D.a(2) a(ii). 

Indicates a series of elements separated by commas 
repeated and terminated with a period. 

If at least one element is required the first element is given 
in bold. The parentheses are only part of the format 
description. 



For ex 


ample 

a(l),a(2) ( ..,a(n). 




where 






each 
allows 


a(t) is a single alphabetic 


character 


or 
or 
or 
as va 


A.B,C,F,G,H 

Z.Y.X 

V 

blank 
ilid in this position. 





A number with a leading *ero is octal, one without a 
leading zero is decimal, and a number in binary is 
specifically indicated as such. 
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SECTION 1 
INTRODUCTION 



The Vanan Omnitask Real Time Executive (VORTEX II) is 
a modular software operating system for controlling, 
scheduling, and monitoring tasks in real time multrpro 
gramming environment. VORTEX II supports memory map 
operation to a maximum of 256K of central memory. 
VORTEX II also provides for background operations such as 
compilation, assembly, debugging, or execution of tasks not 
associated with the real time functions of the system. In 
addition, VORTEX II supports user tasks using the V75 
extended instruction set. Thus, the basic features of 
VORTEX II comprise ' 

Memory map management 

Realtime I/O processing 

Provision for directly connected interrupts 

Interrupt processing 

Multiprogramming of real time and background 
tasks 

Overlapping output to peripherals with spooling 

Priority task scheduling (clock time or 
interrupt) 

Load and go (automatic) 

Centralized and device independent l/Qssy^tem t 
using logical unit and file naifies M J * 

Operator communications 

Batch processing job control language 

Program overlays 

Background programming aids FORTRAN and 
RPG IV compilers, DAS MR assembler, load module 
generator, library updating, debugging, and 
source editor 

Use of background area when required by 
foreground tasks 

Disc/drum directories and references 

System generator 

Individual task protection 

NOTE: Throughout this manual, all references to 

VORTEX imply VORTEX II. 

1.1 SYSTEM REQUIREMENTS 

VORTEX requires the following minimum hardware 
configuration: 



a. Varian V70 series computers with 32K memory 

b. 33/35 ASR Teletype or compatible CRT on a priority 
interrupt module 

c. Priority Interrupt Module (PIM) 

d. Rotating memory device (RMD) on a PIM with either a 
buffer interlace controller (BIC) or block transfer 
controller (BTC) 

e. One of the following on a PIM: 

(1) Card reader with a BIC 

(2) Paper-tape system or a paper-tape reader 

(3) Magnetic-tape unit with a BIC 

f. Memory map hardware 

The system supports and is enhanced by the following 
optional hardware items: 

a. Additional main memory (upltjfc to~taN8r,256K) 

b. Additional rotating memory devices 

c. Automatic bootstrap loader with VORTEX II (device 
dependent) system boot 

d Card reader, if one is not included in the minimum 
system with BIC and PIM 

,> :% 4 ■ ft 

e Card puncS with BIC and PIM *' 

f. Line printer with BIC and PIM 

g. Paper-tape punch, if one is not included in the 
minimum system 

h. Process in pufaffd output 

i Data communications multiplexor 

I Electrostatic printer/ plotter 

k. Writable control store 

I. Floating point processor 

m. V75 extended instruction set. 

All BICs, BTCs, and DCMs must have memory mapping 
capability. 

The rotating memory device (RMD) serves as storage for 
the VORTEX operating system components, enabling real 
time operations and a multiprogramming environment for 
solving realtime and nonreal-time problems. Real time 
processing is implemented by hardware interrupt controls 
and software task scheduling. Tasks are scheduled for 



*& 



1-1 



INTRODUCTION 



execution by operator requests, other tasks, device inter 
rupts, or the completion of time intervals. 

Background processing (nonreal time) operations, such as 
FORTRAN compilations or DAS MR assemblies, are under 
control of the job-control processor (section 4), itself a 
VORTEX background task. These background processing 
operations are performed simultaneously with the real-time 
foreground tasks until execution of the former is sus 
pended. either by an interrupt or a scheduled task. 



1.2 SYSTEM FLOW AND ORGANIZATION 

VORTEX executes foreground and background tasks 
scheduled by operator requests, interrupts, or other tasks. 
All tasks are scheduled, activated, and executed by the 
real time executive component on a priority basis. Thus, in 
the VORTEX operating system, each task has a level of 
priority that determines what wilt be executed first when 
two or more tasks come up for execution simultaneously. 

The job-control processor component of the VORTEX 
system manages requests for the scheduling of background 
tasks. 



Upon completion of a task, control returns to the real-time 
executive. In the case of a background task, the real-time 
executive schedules the job-control processor to determine 
if there are any further background tasks for execution. 

During execution, any foreground task can use any real 
time executive service (section 2. 1 ). 

Figure 1-1 is an overview of the flow in the VORTEX 
operating system. Section numbers refer to further discus 
sion of this manual. 



1.2.1 Computer Memory 

VORTEX requires a minimum of 32K words of main 
memory and supports up to a maximum of 256K words 

The system generation (SGEN, section 15) programs 
execute in a non memory map environment and conse 
quently utilize only the first physical 32K words of main 
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v$n c 

3,'K 



(a) 



V$BrC 

(b) 
V$GFCB 

VSBTBM 

«J) 

7$BVN 
V$CRDR 
(e) 

02000 



01000 



0) 



horeground Blank Common 
(Full Access) 



Possible unasserted sp ( ir« to keep 
global FCBs on the same page (80 
words maximum) 



Global FCBs 



JCP/OPCOM Butlers 

DST/LUN/PST COTAD 

Controller Table? 

TtDBs 

User Data (except reentrant 

subroutines called with ALOC) 



V$E.XtC Real Time E: xecutive 

VJIOC Input/Output Control 

Drivers 

Reentrant Subroutine 

Reentrant Subroutine Slack 



Resident Task Directory 



Unallocated Memory 
Dynamically allocated lor 
TIDB, I/O requests, map 
images, etc 



Page 1 reserved for OPCOM 



Page System Constants 



Mapped m with all 
loreground tasks 
referencing blank 
( ommon 



Mapped in with all 
background tasks 
referencing global 
FCBs 



Mapped in with programs 
referencing CL labels 



Bottom ot table region 



Accessible only to Map 



Bottom of fixed nucleus 



Bottom of nucleus (may 
be redefined by EDR.R 
SGEN directive, which 
does not change V$BVN) 



Mapped into all tasks 



NOTE TSK defined resident tasks are loaded upward from 
physical address 02000 in the first physical 32K of memory 
by SGEN. However, the resident tasks are not mapped in 
Map but in a user map (1 15) as the resident tasks are 
scheduled. The physical page numbers defining the 
resident tasks are contained in the resident directory 
(V$CRDR). 

NOTE: V$TFC P V$BFC, etc are system pointers in page 
described in section 14, table 14-1. 

NOTE: V$TFC, top of nucleus, is specified on SGEN MRY 
directive (described in section 15.5.1). 

Figure 1-2. VORTEX Nucleus, Map 
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memory All resident tasks and data reside m the first 32K 
of memory. Except for those resident tasks defined by the 
SGEN TSK directive, a!f other resident tasks and data are 
considered as part of the VORTEX nucleus The nucleus is 
assigned to be in the executive mode, map 0, virtual 
memory (see section 13) 



1.2.2 Rotating Memory Device 

At least one RMD {disc or drum) is required lor storage of 
VORTEX operating system components The RMD is divided 
into a fixed number of variable length areas called 
partitions. These are defined at system generation time 
(section 15). 



Figure 1 2 illustrates the map nucleus memory layout 
The 32 K words memory space is grouped into several 
modules 



The following reside on the RMD (figure 1 3V 

.». System initializer, loader, and VORTFX nucleus in 
absolute format 



j Foreground Blank Common Module: This module is 
mapped with all foreground tasks referencing blank 

common. 

d Global FCB Module This module is mapped with a\\ 
background tasks referencing the global FCBs It is 
read only access mode for priority tasks and read/ 
write lor priority 1 tasks. This module is of approxi 
mately 9C words 

c Nucleus Table Module This module is mapped with all 
tasks with an external name defined in the CL library. 
Read only access mode for priority tasks and read/ 
wnte access for all other tasks. The bottom of this 
module is defined in V$BTBM and is determined by 
SGEN during the nucleus module building. Control 
record CTL21 specifies the end of the nucleus table 
module. All user data and programs which are to be 
included in this module must precede the CTL.21 
control record. The approximate size of this module is 
1000 words (RMD line printer, card reader, Teletype. 
CRT) 

d Nucleus Programs Module This module consists of 
V$EXEC, V$IOC. I/O drivers, reentrant subroutines, 
stacks, and any user programs inserted between the 
CTL.21 and CTL.PART0003 SGEN tasks The bottom 
of this module is defined by V$CRDR. The approxi 
mate size of this module is 6800 words (RMD, line 
printer, card reader, Teletype, CRT drivers). 

e, Map Allocable Memory Space Trie virtual memory 
space between page two and V$CRDR is available for 
dynamic allocation I/O request block, TIDB block, 
and map image memory space are allocated in this 
region. Page one is reserved for the OPCOM task. The 
actual physical memory assigned to the virtual 
memory space is memory management performed by 
the RTE component 

f Page 0: Always reserved for system constants, interrupt 
traps, and background literal pool (a description is 
found in section 14, table 14 3). 

The unused physical memory in th*. firs, 32 K and !! 
physical memory above 32K are designated as allocable 
memory. This is the physical memory which is dynamically 
allocated for map memory space as described in e, and 
which is allocated to a user mode task's logical memory. 



b. Checkpoint file 

c. GO file 

d User library 

e. Transient files 

f Relocatable object-module library 

g. Relocatable load module library 

1.2.3 Secondary Storage 

The VORTEX operating system supports any secondary 
storage devices that have been specified at system 
generation time 



System Initializer and 
Loader 

VORTEX Nucleus in 
Absolute Format 

CL Directory 



Relocatable Object Module 
Library 



Relocatable Load Module 
Libraries 




Transient Files 



Figure 13. VORTEX RMD Storage Map 
1.3 MEMORY MAP CONCEPT 

VORTEX logical (virtual memory is defined to b^ 32K 
words. This is the maximum memory space that any single 
task can address, even though the physical memory space 
may be as great as 256K words. Where in actual or physical 
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memory that task resides is transparent to the task and is 
a memory management function performed by the RTE 
component of VORTEX. 

Each logical memory space (32K) is organized into fixed 
size blocks of 512 words (010OO in octal), called logical 
(virtual) pages. Hence, there are 64 logical pages within a 
32K logical memory space. The size of the logical memory 
available to a task is reduced by: 

a. Page 0: The first page of 512 words is reserved for 
system constants, interrupt trap locations, background 
literal pool and communication link for IOC and 
V$EXEC calls. This page is mapped in alt logical 
memories. 

b. Nucleus Modules: A task referencing an external name 
which is defined in the CL library will have the 
corresponding VORTEX nucleus module mapped in 
logical memory for a task (Section 1.2.1 describes in 
greater detail the nucleus modules.) These are: 

(1) Foreground blank common module 

(2) Global FCB module, and/or 

(3) Nucleus table module 

c Any FORTRAN program performing input/output 
operation will have the nucleus table module mapped 
into its virtual memory. FORTRAN runtime package 
requires access to the device specification table 
(DST), logical unit tables (LUT), and controllers tables 
for linking information. The maximum available 
logical memory space available is V$BTBM (bottom ot 
nucleus table module, location 0331) minus 01000 
(program Start logical address). V$BTBM is defined 
on the SGEN listing. 

d For background priority 1 tasks, page is set to read/ 
write access mode to permit tasks, e.g., JCP, to modify 
low memory pointers V$JCFG, V$CRDM, etc. Hence, 
the method of transferring control from user mode to 
executive mode for I/O and RTE calls is to map in the 
pages containing the entry to V$IOC (I/O calls). 
V$EXF_C (RTE calls), and V$)OST (STAT calls). 
Therefore a priority 1 task making an I/O call (or RTE 
call, or STAT call), executes a JSR,X to location 0404 
Because page is set to read /write access mode, the 
instruction at 0404 (JMP V$IOC) is executed. The first 
instruction in V$lOC (likewise, V$EXEC and V$IOST) 
is a disable PIM (EXC 0444) instruction. Execution of 
an I/O type instruction in the user map generates a 
memory-protection interrupt, which forces the system 
to the executive mode and hence the means of 
transferring control to the map tasks. Therefore, the 
available memory space for a background task is 
from location 01000 to the page where V$IOC (which 
is lower in memory than VSEXEC) resides. V$IOC 
address is defined on the SGEN output listing. 

All user mode tasks are loaded from logical address 01000. 
A task not referencing external names defined in the CL 
library has all of the logical memory available to it except 
page 0. 

Physical memory is also organized into fixed-size blocks of 
512 words, referred to as physical pages. A system with 



physical memory size of 256K words contains 512 physical 
pages (64 physical pages for each 32K words of memory). 

Allocation of logical memory to physical memory is 
accomplished by pages. A task of 010000 (4096 in decimal) 
words will reside in eight physical pages of physical 
memory. These physical pages need not be contiguous. 
However, that fact is transparent to the task. During 
execution, the task assumes that its eight pages are 
contiguous. The linking of physical pages is performed by 
the memory map hardware. All user program object 
modules are assembled relative to location 0. Load modules 
are generated by SGEN and LMGEN to be relative to logical 
address 01000. 

A map defines the 64 logical pages within a logical memory. 
Each logical page can be set to one of four possible access 
modes: 



Unasstgned 



Read/Write 



Read Operand 
Only 

Read Only 



The logical addresses within that 
virtual page are unassigned. 

AM accesses including write operation 
permitted to /from the logical page. 

Only operand fetches permitted from 
the logical page. 

Only instruction or operand fetches 
permitted within the logical page. 



Each logical page, except for the pages with unassigned 
status, must be assigned to a physical page. The RTE task 
sets the status for each page, allocates a physical page to 
each logical page, and loads the corresponding mapping 
registers. 

The memory map hardware provides a 4-bit map register 
for the 16 possible maps. This 4 bit map register is set by 
the RTE component to select the proper map (0-1 5). Map 
is defined as the executive mode. All other map selections 
(115) are designated as being in the user mode However, 
when the system is forced to the executive mode, state 0, 
by an I/O, real-time, or memory map interrupt, the map 
register will continue to contain the currently executing 
user map selection number 

Executive 



All instructions except HALT are permitted in this mode. 
Any interrupt will force the hardware to enter this mode in 
executive mode state 0. The interrupt will not disable the 
map. VORTEX Real-Time Executive (RTE), Input /Output 
Control (IOC), I/O drivers, and other resident tasks and 
constants are mapped into the executive mode. The 
instructions and data which comprise the VORTEX nucleus 
are mapped in the executive mode. Any task executing I/O 
instructions (EXC, OAR, SEN, etc.) must execute in map 

A HALT instruction executed in the executive mode with the 
map enabled will generate an interrupt The HALT is 
permitted only in the disabled map state. 
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There are four executive modes states as shown in table 
11 A map task will normally execute in state 0. In state 
0, dll instruction fetches and operand fetches and stores 
are performed in map logical memory. If a map task 
must fetch and store data to or from a user map (115), the 
map task must switch to the proper executive mode state 
(1, 2 or 3), then upon completion of the fetch or store, 
restore the executive mode to state 0. A convenient way of 
switching executive or mode states is to output one of the 
control words established by the RTE component in the 
page system data region, locations 0334 0337: V$ST0, 
V$ST1, V$ST2, and V$ST3 for executive mode states 
through 3 respectively. An example of switching to 
executive mode 3 is OME 046, V$ST3, where 046 is the 
memory-map device address 



User Mode 

All operands and instructions are mapped in accordance 
with the map register contents. Error conditions will cause 
interrupts, which force the system to the executive mode. 
User mode is entered from the executive mode under 
control of RTE 



1.4 BIBLIOGRAPHY 

The following gives the stock numbers of Varian manuals 
pertinent to the use of VORTEX and the V70/620 
computers: 





Document 


Title 


Number 


V72 Handbook 


98 A 9906 20x 


V73 Handbook 


98 A 9906 Olx 


V70 Series Memory Map Manual 


98 A 9906 lOx 


620-100 Computer Handbook 


98 A 9905 OOx 


FORTRAN IV Reference Manual 


98 A 9902 03x 


RPG IV Users Manual 


98 A 9947 03x 


VTAM Reference Manual 


98 A 9952 22x 


HASP/RJE Operator's Manual 


98 A 9952 21x 


Microprogramming Guide 


98 A 9952 21x 


VORTEX Installation Manual 


98 A 9906 07x 



Where x is a revision level number subject to change. 

Maintenance information is in the following VORTEX and 
VORTEX II Software Performance Specifications: 



Privileged instructions (e.g., EXC, HALT) are not permitted 
in this mode. An interrupt is generated if a task attempts 
to execute a privileged instruction. Foreground tasks may 
execute disable and/or enable PIMS and RT clock 
instructions (EXC 0444, EXC 0244, EXC 0147, EXC 0747) 
Section 14.4.4 describes this subject further 

Section 2.2, RTE System Flow, describes the user mode and 
executive mode tasks. 



Table 1-1. Executive Mode States 



State 


1 
2 
3 

+ MAP 
♦MAP N 



Instruction 
Fetch 

MAP 
MAP 
MAP 
MAP 



Operand 
Fetch 

MAP 
MAP 
MAP N 
MAP N 



Store 

MAP 
'MAP N 
MAP 
MAP N 



refers to the executive task map. 
refers to the task map specified by 
the map register, (n « 1-15) 





Document 


Title 


Number 


VORTEX II System Overview 


89A0259 


VORTEX II External 


89A0273 


Specification 




VORTEX II Internal 


89A0289 


Specification 




VORTEX External 


89A0203 


VORTEX Internal Volume 1 


89A0231 


VORTEX Internal Volume 2 


89A0232 


VQRTEX Internal Volume 3 


89A0233 


VORTEX Internal Volume 4 


89A03Q4 


DAS MR Assembler Internal 


89A0225 


FORTRAN IV Compiler Internal 


89A0214 


FORTRAN IV Library Internal 


89A02U 


RPG IV Runtime/Loader 


89A0234 


Interna! 




RPG IV Compiler Internal 


89A0184 


FORTRAN Accelerator and 


89A0285 


VORTEX Spooler Overview/ 




External 





SECTION 2 

REAL-TIME EXECUTIVE SERVICES 



The VORTEX real-time executive (RTE) component 
processes, upon request by a task, operations that the task 
itself cannot perform, including those involving linkages 
with other tasks. RTE service requests are made by macro 
calls to V$EXEC, followed by a parameter list that contains 
the information required to process the request. 

The contents of the volatile A and B registers and the 
setting of the overflow indicator are saved during execution 
of any RTE macro. After completion of the macro, these 
values are returned. The contents of the X register are lost. 
If the task uses the V75 registers 3 through 7, the contents 
of R3 through R7 are also saved. 

There are 32 priority levels tn the VORTEX system, 
numbered through 31. Levels and 1 are for background 
tasks and levets 2 through 31 are for foreground tasks. If a 
background task is assigned a foreground priority level, or 
vice versa, the task automatically receives the lowest valid 
priority level for the correct environment. Lower numbers 
assign lower priority. If more than one task has the same 
priority level, they are selected for execution on a first-in, 
first-out basis. Background and foreground RTE service 
requests are similar. 

Table 2 1 RTE Service Request Macros 



Mnemonic Description 

SCHED Schedule a task 

SUSPND Suspend a task 

RESUME Resume a task 

DELAY Delay a task 

LDELAY Delay and reload from 
specified logical unit 

PMSK Store PIM mask register 

TIME Obtain time of day 

OVLAY Load and /or execute an 
overlay segment 

ALOC Allocate a reentrant 

stack 

DEALOC Deallocate the current 
reentrant stack 

EXIT Exit from a task (upon 

completion) 

ABORT Abort a task 



Level 


FORTRAN 


Yes 


Yes 


Yes 


Yes 


No 


Yes 


No 


Yes 


No 


Yes 


No 


Yes 


Yes 


Yes 


Yes 


Yes 



No 



Yes 



No No 



Yes Yes 



No Yes 



IOLINK Link background I/O 

PASS Pass map data 

TBEVNT Set/fetch task's TBEVNT 

ALOCPG Allocate memory page(s) 
(Priority in map 0) 

DEALPG Deallocate memory 
page(s) (Priority in 
map 0) 

MAPIN Map in specified memory 
page(s) 

PAGNUM Identify physical page 
number 



Yes 


No 


Yes 


Yes 


Yes 


No 


Yes 


No 



Yes 



No 



Yes 



No 



No 



No 



Whenever a task is aborted, all currently active I/O 
requests are completed. Pending I/O requests are de 
queued. Only then is the aborted task released. 

There are 18 RTE service request macros. Certain of them 
are illegal in unprotected background (level 0) tasks. Table 
2 1 lists the RTE macros, indicates whether they are legal 
in level tasks, and indicates whether there is a FORTRAN 
library subroutine (section 13) provided. 

Note: A task name comprises one to six alphanumeric 
characters (including $), left-justified and filled out with 
blanks. Embedded blanks are not permitted. 

2.1 REALTIME EXECUTIVE MACROS 

This section describes the RTE macros given in table 2 1 
The general form of an RTE macro is 



label 



where 



label 

mnemonic 

each p(n) 



,P(D,P(2) fXn) 



permits access to the macro from 
•fsewttere in the program 

is one of fttose given in table 2 1 

is a parameter defined under the 
descriptions of the individual macros 



The omission of an optional parameter is indicated by 
retention of the normal number of commas unless the 
omission occurs at the end of the parameter string Thus, 
in the macro (section 2.1.1) 
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SCHED 8, , 106, , 'TA' , ' SK* , 'A' 

the first double comma indicates a default value for the 
watt option and the second double comma indicates 
omission of a protection code. 

Error messages applicable to RTE macros are given in 
Appendix A.2. 

2.1.1 SCHED (Schedule) Macro 

This macro schedules the specified task to execute on its 
designated priority level The scheduling task can pass two 
values in the A and B registers to the scheduled task (a 
task using the V75 registers 3 through 7 can also pass 
parameters in R3 through R7). A TIDB is created for each 
scheduled task, (see section 14 for a description of TIDB). 
The macro has the general form. 



label SCHED levelwa/Uun.key/xxVyyVzz' 



where 



level is the value from (lowest) to 31 

(highest) of the priority level of the 
scheduled task 

wait is (default value) if the scheduling and 

scheduled task obtain CPU time based 
on priority levels and I/O activity, or 1 if 
the scheduling task is suspended until 
completion of the scheduled task 

lun is the name or number of the logical unit 

whose library contains the scheduled 
task, zero to schedule a resident 
foreground task, or 106 to schedule a 
nonresident task from the foreground 
library. If a zero is specified and the task 
is not found in the resident directory, the 
RTE component (SAL) will automatically 
search tor the task on the foreground 
library (FL) 

key is the protection code, if any, required to 

address kin (0306 or F' to schedule a 
nonresident task from the foreground 
library). The foreground library logical 
unit and its protection key are specified 
by the user at system generation time 

xxyyzz is the name of the scheduled task in six 

ASCII characters, coded in pairs 
between single quotation marks and 
separated by commas; e.g., the task 
named BIGJOB is coded 'BI'.'GJVOB' 
and the task named ZAP is coded 
•ZA7P7 * 

The FORTRAN calling sequence for this macro is 

CALL SCHED(level,wa<Mib,*ey,name) 

where lib is the number of the library logical unit 
containing the task, and name is the three-word Hollerith 



array containing the name of the scheduled task. The other 
parameters have the definitions given above. 

All tasks are activated at their entry point locations, with 
the A and B registers (and the V75 registers if available) 
containing the value to be passed. The scheduled tosk 
executes when it becomes the active task with the highest 
priority. 

The specified logical unit (which can be a background 
library, a foreground library, or any user-defined library on 
an RMD) must be defined in the scheduie-calting sequence 

Expansion: The task name is loaded two characters per 
word The wait option flag is bit 12 of word 2 (w). 




Examples: Schedule the foreground library task named 
TSKONE on priority level 5 Use the no wait option so that 
scheduled and scheduling tasks obtain Central- Processor 
Unit (CPU) time based on priority levels and I/O activity. 



FL EQU 

KEY EQU 



106 



0306 



(LUN assigned to 
foreground library FL) 
(Protection code 
for FL) 



SCHED 5,0,FL,KEY, 'TS' , ' KO ' , ' NE ' 
(Control return to 
highest priority) 



Note: the KEY line can be coded with the equivalent ASCII 
character enclosed in single quotation marks. 

KEY EQU 'F' 

The same request in f ORTRAN is 

DIMENSION N1 ,N2< 3) 

DATA N1/2H F/ 

DATA N2< 1 ) ,N2(2) , N2 ( 3 ) /2HTS , 2HKO , 2KNE/ 

CALL SCHED(5,0, 106,N1 ,N2) 

or 

CALL SCHED(5,0, 106, 2H F f 6HTSXONE ) 
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2.1.2 SUSPNO (Suspend) Macro 

Thts macro suspends the execution of the task initiating 
the macro. The task can be resumed only by an external 
interrupt, a simulated interrupt caused by IOC or I/O 
completion events for the task, or a RESUME (section 
2.1.3) macro. The macro has the general form 



lable 



SUSPND 



susp 



where susp is if the task is to be resumed by RESUME or 
1 it the task ts to be resumed by external interrupt, or 2 if 
the task is to be resumed by external interrupt or by IOC or 
I/O completion events via a simulated interrupt (i.e., 
TBEVNT word in task's TIDB is set to 1). 



Expansion: The task name is loaded two characters per 
word. 




The FORTRAN calling sequence for this macro is 

CALL SUSPNDCsusp) 
Expansion: The susp flag is bit of word 2 (s). 



an 


15 


14 ]j 12 11 10 9 1 


t 6 S 4 3 2 1 


Word 

Word 1 




J S R X 




-^ 


0406 


jI><3Z 


Word 2 


^>~<^ 



Example: Suspend a task from execution. Provide for 
resumption of the task by interrupt, which reactivates the 
task at the location following SUSPND 



SUSPND 



Example: Resume (reactivate) the task TSKTWO, whtch 
will execute when it becomes the task with the highest 
active priority. 

RESUME 'TS' , 'KT* , 'WO' 

(Control return) 

Control returns to the requesting task when it becomes the 
task with the highest active priority. Control returns to the 
location following RESUME. 

The same request in FORTRAN is 

DIMENSION N1(3) 

DATA Nl(1> f N1(2),NH 3 ) /2HTS , 2HKT , 2HWO/ 

CALL RESUME! N1 ) 



The same request in FORTRAN is 
CALL SUSPND ( 1 ) 



CALL RESUME (6HTSKTWO) 



2.1.3 RESUME Macro 



2.1.4 DELAY Macro 



This macro resumes a task suspended by the SUSPND 
macro. The RESUME macro has the general form 



label 



RESUME 



xx , yy , 21 



where xxyyzz is the name of the task being resumed, 
coded as in the SCHED macro (section 2.1 1). 

The RTE searches for the named task and activates it when 
found. The task will execute when it becomes the task with 
the highest active priority. If the priority of the specified 
task is higher than that of the task making the request, the 
specified task executes before the requesting task and 
immediately if it has the highest priority 

The FORTRAN calling sequence for this macro is 

CALL RESUME(name) 

where name is the three-word Hollerith array containing the 
name of the specified task 



This macro suspends the requesting task for the specified 
time, which is given in two increments. The first increment 
is the number of 5-millisecond periods, and the second, the 
number of minutes. The macro has the genera! form 



label 



where 



milH 



type 



DELAY 



milli, min, type 



is the number of 5 millisecond 
increments delay 

is the number of minutes delay 

is (default value when the task is to be 
suspended for the specified delay, 
remain in memory, and automatically 
resume following the DELAY macro 

1 when the task is to exit from tne 
system, relinquishing memory, and 
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after the specified delay, be auto 
matically rescheduled and reloaded 
in a elapsed time mode, or 

2 when the task is to resume auto 
matically after the specified delay 
or upon receipt of an external 
interrupt whichever comes first, 
and automatically resume following 
the DELAY macro; or 

3 when the task is to resume auto 
matically after the specified delay, 
or upon receipt of an external inter 
rupt, or completion of an I/O request 
initiated previously, whichever comes 
first, and automatically resume following 
the DELAY macro. 

IOC resumes execution of the task by 
setting the TBEVNT word in the task's 
TIDB to 1 

The FORTRAN calling sequence for this macro is 

CALL DELAY(milli,mm,type) 

where the integer-mode parameters have the definitions 
given above. 

The maximum value for either milli or mm is 32767. Any 
such combination given the correct sum is a valid delay 
definition; e.g.. for a 90 second delay, the values could be 
6000 and 1, respectively, or 18000 and 0. After the 
specified delay, the task becomes active When it becomes 
the highest priority active task, it executes. 

Note that the resolution of the clock is a user specified 
variable having increments of 5 milliseconds. The time 
interval given in a DELAY macro must be equal to or 
greater than the resolution of the clock. The delay interval 
is stored in minute increments and real time clock 
resolution increments. 

Expansion: The type flag is bits and 1 of word 2. 



r„ ~ 


IS 14 13 


i? 11 10 9 1 7 6 5 4 3 2 1 
J S R,X 
0406 


Wort 
Word 1 

Wort 2 
Word 3 

Wort 4 

t 




^_~^<^jo oioo j _r^><cj •»• 


mitli 


mm 





Examples: Assuming a 5 millisecond clock increment, delay 
the execution of a task for 90 seconds. At the end of this 
time, the task becomes active. When it becomes the 
highest-priority task, it executes. 



DELAY 



6000, 1 



Delay the execution of a task for 90 seconds or until receipt 
of an external interrupt, whichever comes first, at which 



time the task becomes active. Such a technique can test 
devices that expect interrupts within the delay period. 

DELAY 18000,0,2 

Delay the execution of a task for 90 seconds, or until 
receipt of an external interrupt, or the completion of a 
previously initiated I/O request, whichever comes first. 



DELAY 



18000,0,3 



2.1.5 LDELAY Macro 

This macro is a type 1 DELAY macro with additional 
parameters to specify the logical unit from which the task is 
to be reloaded after the delay. The macro has the general 
form: 



where 



label 



milli 



lun 



key 



LDELAY milM,m.n,lun,key 



is the number of 5 millisecond 
increments delay 

is the number of minutes delay 

is the number of the logical unit from 
which the task is to be loaded after the 
delay (DELAY tape 1 reloads from FL 
library) 



is the protection code for the logical unit 

The FORTRAN calling sequence for this macro is 

CALL LDELAY (milli.min.lun.key » 

where the integer mode parameters have the definitions 
given above. 

Time is the same as specified for DELAY. 
Expansion: 



tut 

Word 
Word 1 
Word 2 
Word i 



15 14 U 1? 11 10 9 9 7 6 5 4 3 2 1 

J S R K 



0406 



^ 



Example: Assuming a 5 millisecond clock increment, delay 
the execution of a task for 90 seconds. At the end of this 
time, the task becomes active. When it becomes the 
highest priority task, it is loaded from logical unit 128 
which has protection key A. and executed. 



LDELAY 



6000, 1 , 128,030 
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2.1.6 PMSK (PIM Mask) Macro 

This macro redefines the PIM (priority interrupt module) 
interrupt structure, i.e., enables and/or disables PIM 
interrupts. The macro has the general form 



label 



PMSK 



pirn, mask, opt 



The same request in FORTRAN ts 
CALL PMSK(2,56, 0) 
Disable the same lines. 

PMSK 2 ,070, 1 



where 



pim 



mask 



opt 



is the number (1 through 8) of the PIM 
being modified 

indicates the changes to the mask, with 
the bits indicating the interrupt lines 
that are either to be enabled or disabled, 
depending on the value of opt, and with 
the other lines unchanged 

is (default value) if the set bits in mask 
indicate newly enabled interrupt lines, 

or 1 if the set bits in mask indicate newly 

disabled interrupt lines 



The FORTRAN catling sequence for this macro is 

CALL PMSK(pim,mask,opt) 

where the integer mode parameters have the definitions 
given above. 

The etght bits of the mask correspond to the eight priority 
interrupt lines, with bit corresponding to the highest 
priority line 

VORTEX operates with alt PIM lines_exiabied y nje. s . s altered 
by"~a PMSK macro. Normal interrupt-prooessing allows all 
interrupts and does one of the following: a) posts (in the 
TID8) the interrupt occurrence for later action if it is 
associated with a lower-priority task, or b) immediately 
suspends the interrupted task and schedules a new task if 
the interrupt is associated with a higher-priority task. 
PMSK provides control over this procedure 

Note; VORTEX (through system generation) initializes all 
undefined PIM locations to nullify spurious interrupts that 
may have been inadvertently enabled through the PMSK 
macro. 

Expansion: The opt flag is bit of word 2 (o). 



Kt 


15 


14 


13 12 11 10 9 * 7 6 5 4 3 


2 


1 


Word 




J S R.X 


Word 1 








0406 




i 


Word i 








i !'. 




!•■ 


Word 3 








pirn mask 







Examples: Enable interrupt lines 3, 4, and 5 on PIM 2 
Leave all other interrupt lines in the present states 



2.1.7 TIME Macro 

This macro loads the current time of day in the A and B 
registers with the B register containing the minute, and the 
A register the 5-millisecond, increments. The macro has the 
form 

label TIME 

The FORTRAN calling sequence for this macro is 

CALL TIME(minmilli) 

where min is the integer minutes to the 24 hour total, and 
mitli is the seconds in 5-millisecond integer increments. 

Expansion: 



Bit 


15 14 13 1? 11 10 9 8 7 6 5 4 3 2 1 | 


Word 


| J "5 FI.X | 


Word 1 
Word .' 


j r*06 i 



Example: Load the current time of day in the A t> 
millisecond increments) and B (1 minute increments) 
registers 

TIME 

(Return with time in A 
and B registers) 



2.1.8 OVLAY (Overlay) Macro 

This macro loads and/or executes overlays within an 
overlay-structured task, it has the general form 



label 



OVLAY 



type,'xx','yy','zz' 



where 



type 



xxyyzz 



PMSK 



2,070 



is (default value) for toad and 
execute, or 1 for load and return 
following the request. If only 
load is specified, the load address 
is returned in the X register. 

is the name of the overlay segment. 
coded as in the SCHED macro {section 
2.1.1) 
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The FORTRAN calling sequence for this macro >s 

CALL OVLAY<type,retoad,name) 

where type is a constant or name whose value has the 
definition given above, reload is a constant or name with 
the value zero to load or non zero to load only if not 
currently loaded, and name is a three word Hollerith array 
containing the overlay segment name. 

FORTRAN overlays must be subroutines if called by a 
FORTRAN call. 

Expansion: The overlay segment name is loaded two 
characters per word. The type flag is bit of word 2 (t). 




When the load and execute mode is selected in the OVLAY 
macro RTE executes an equivalent of a root segment JSR 
instruction to enter the overlay segment. Therefore, the 
return address of the root segment is available to the 
overlay segment in the X register. 

Example: Find, load, and execute overlay segment 
OVSG01 without return 

OVLAY 0, 'OV, 'SG' , '01' 

(No return) 

The same request in FORTRAN is 

DIMENSION N1( 3 ) 

DATA N1(1),N1(2),N1( 3)/2HOV, 2HSG,2H0 1/ 

CALL OVLAY ( 0,0, N1 ) 



CALL OVLAY (0,0,6HOVSG01 ) 

External subprograms may be referenced by overlays. If a 
subprogram S is called in several overlays, and S is not in 
the main segment, each overlay will be built with a 
separate copy of S. 

When using FORTRAN overlays containing I/O statements 
for RMO files defined by CALL V$OPEN or CALL V$OPNB 
statements (described in section 5.3.2), the main segment 
must contain an I/O statement so that the runtime I/O 
program (V$FORTIO) will be loaded with the main segment. 
FOB arrays must be in the main segment or in common, so 
they are linked in memory and cannot be in any overlay. 



2.1.9 ALOC (Allocate) Macro 

This macro allocates space in a push-down (LIFO) stack of 
variable length for reentrant subroutines. The macro has 
the general form 



label 



ALOC 



address 



where address is the address of the reentrant subroutine to 
be executed. 

The FORTRAN calling sequence for this macro is 

EXTERNAL subr 

CALL ALOC(subr) 

where subr is the name of the DAS MR assembly language 
subroutine. 

The first location ot the Llf O stack is V$FLRS. and that of 
the current position in the stack is VJCRS. The first word of 
the reentrant subroutine, whose address is specified in the 
general form of ALOC, contains the number of words to be 
allocated. If fewer than five words are specified, five words 
are allocated 

Control returns to the location following ALOC when a 
DEALOC macro (section 2.1.10) is executed in the called 
subroutine. Between ALOC and DEALOC, (1) subroutine 
cannot be suspended, (2) no IOC calls (section 3) can be 
made, and (3) no RTE service calls can be made. 

Reentrant subroutines are normally included in the 
resident library at system generation time so they can be 
concurrently accessed by more than one task. The 
maximum size of the push down stack is also defined at 
system generation time 



Expansion: 




■i 4 3 




Word 
Word 1 
Wore* 2 
Word 3 


15 14 13 12 11 tO 9 « 7 6 


7 1 


t S R.X 





mrx> 


'" ^^^' ' ! 1 


"X^ 


Reentrant subroutine address 



Reentrant subroutine: The reentrant subroutine called by 
ALOC contains, m entry location x, the number of words to 
be allocated. Execution begins at x + 1. The reentrant 
subroutine returns control to the calling task by use of a 
DEALOC macro 

The reentrant stack is used to store register contents and 
allocate temporary storage needed by the subroutine being 
called. The location V$CRS contains a pointer to word of 
the current allocation in the stack. By loading the value of 
the pointer into the X (or B) register, temporary storage 
cells can be referenced by an assembly language M field of 
5,1 for the first celt; 6.1 for the second; etc. 
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A stack allocation generated by the ALOC macro has the 

format: 



Sit 


IS 


14 13 12 U 10 9 8 7 6 5 4 3 2 1 


Word 
Word 1 
Word 2 
Word 3 
Word 4 
Word S 

Word n 


Content* ot the A register 


Contents ot the 8 register 


Content* of the X register 


ovtl 


Contents 0) the P register 




Stack-control pointer (for RTE use only) 




For reentrant subroutine use (temporary storage} 


Words rt + 1 
to 

n + 5 


V>5 registers 3 > 



task, and returns control to the location specified in word 3 
(P register value) of the reentrant stack (section 2.1.9). The 
macro has the form 



Expansion: 



DCALOC 



Btl 15 14 13 12 11 10 4 * 7 t 5 4 3 2 1 


Word 

Word 1 
Word 2 


J S R.X 


0406 


^x^ o o 0111 ^T^^^-Cr 



where ovfl is the overflow indicator bit. 



Example: Release the current reentrant stack, restore the 
contents of the volatile registers and the setting of the 
overflow indicator and return control to the location 
specified in word 3 of the stack. 



The current contents of the A and 8 registers are stored in 
words and 1 of the stack and are restored upon execution 
of the DEALOC macro The same procedure is used with the 
setting of the overflow indicator bit in word 3 of the stack. 
The contents of word 2 (X register) point to the location of 
the reentrant subroutine to be executed following the 
setting up of the stack The contents of word 3 (bits 140) 
point to the return location following ALOC. 

Example: Allocate a stack of six words. Provide for 
deallocation and returning of control to the location 
following ALOC. 



SUB1 



EXT 


SUB1 


ALOC 


SUB! 


-. 


(Return Control) 


NAME 


SUB1 


DATA 


6 



(Reentrant subroutine) 



DIALOC 
KND 



2.1.11 EXIT Macro 

This macro is used by a task to signal completion of that 
task. The requesting task is terminated upon completion of 
its I/O: The macro has the form 



labei 



EXIT 



The FORTRAN calling sequence (no parameters specified) 

is 



CALL 



EXIT 



If the task making the EXIT is in unprotected background 
memory, the macro schedules the job-control processor 
(JCP) task (section 4). 



DEALOC 
END 



Each time SLM31 is called, six words are reserved in the 
reentrant stack. Each time the reentrant subroutine makes 
a DEALOC request (section 2.1.10), six words are deallo 
cated from the reentrant stack. If the calling task uses the 
V75 registers, 11 words are allocated /deallocated 



2.1.10 DEALOC (Deallocate) Macro 



Expansion: 



Ml 1* 14 13 12 11 10 9 • 7 • 5 4 3 2 1 


Word 
Were 1 
Ward 2 


J S R.X 


0406 


.-^ ^^**-^ 


6 10 





Example: Exit from a task. The task making the EXIT call 
is terminated upon completion of its I/O requests. 



This macro deallocates the current reentrant stack, 
restores the contents of the A and 8 (and V75) registers 
and the setting of the overflow indicator to the requesting 



EXIT* 



(rift return) 
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2.1.12 ABORT Macro 



This macro aborts a task. Active I/O requests are 
completed, but pending I/O requests are dequeued. The 
macro has the general form 



label 



ABORT 



xx \ yy , n 



2.1.13 IOLINK (I/O Linkage) Macro 

This macro enables background tasks to pass buffer 
address and buffer size parameters to the system back 
ground global FCBs. It has the general form 



label 



where 



IOLINK 



hjng$d,bufk>c bufs/z 



where xxyyzz is the name of the task being aborted, coded 
as in the SCHED macro (section 2.1.1). 



The FORTRAN calling sequence for this macro is 



lungsd is the logical unit number of the global 

system device 

buftoc is the address of the input /output buffer 

bufsiz is the size of the buffer (maximum and 

default value: 120 



CALL ABORT(name) 



where name is the three-word Hollerith array containing the 
name of the task being aborted. 

Expansion: The task name is loaded two characters per 
word. 



ABORT 



TS 



1 ■ • — — 


•H 


Word 


Word 1 


Word 2 


Word 3 



Word 4 
Word 5 



15 14 13 1? 11 10 9 > 1 6 *» 4 3 2 I 

J S R.X 
0406 



Task nam* 
Task name 
Task name 



Example: Abort the task TSK and return control to the 
location following ABORT. 



ABORT 'TS'/K', 

(Control return) 



Global file control blocks: There are eight global FCBS 
(section 3.5.11) in the VORTEX system reserved for 
background use. System background and user programs 
can reference these global FCBs. JCP directive /PFILE 
(section 4.2.11) stores the protection code and file name in 
the corresponding FCB before opening/rewinding the 
logical unit. The IOLINK service request passes the buffer 
address and the size of the record to the corresponding 
logical-unit FCB The names of the global FCBs are SIFCB, 
PtFCB, POFCB, SSFCB, BIFCB, 80FCB, GOFCB, and 
LOFCB, where the first two letters of the name indicate the 
logical unit. 



Bit 

Word 
Word 1 


15 14 


11 1 


11 10 9 B 
J S M,X 
0406 


7 


« 5 


4 3 2 1 


Word 2 


Jo , , 





! 

o ! 

j 


lunjid 


Word 3 


(Hi f IOC 








Word 4 






bufw 









Example: Pass the address and size specifications of a 
40-word buffer at address BUF to the PI global FCB. 



The same request in FORTRAN is 



PI 



BQU 4 
EXT PIFCB 

(PI logical-unit number 4) 



DIMENSION N1(3) 

DATA N1(1),M1<2) ( N1(3)/2HTS,2HK , 2H / 

CALL ABORT(N1) 



IOLINK PI,BUP,40 
READ PIFCB, P1, 0,1 

(Read 40 ASCII words 
from PI) 



or 



CALL ABORT (6HTSK ) 



BUP 



BSS 

END 



40 
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If the PI file is on an RMD, reassign the PI to the proper 
RMD partition, and then position the PI file using JCP 
directive /PFILE. 



2.1.14 PASS Macro 

This macro fetches map data into the user map. It has 
the general form 

label PASS count.trom.to 

where 

count is the number of words to be passed 

f rom is the map fetch address 

to is the user map store address 

The FORTRAN calling sequence for thts macro is: 
CALL PASS(count,from,to) 

Expansion: 



Bit 


15 14 13 12 U 10 9 • 7 6 5 4 3 3 1 


Word 


J S R.X 


Word 1 
Word 2 


fWOh 


j^> ,< cz ° oil i o j^r^-*"*-^' 


Word 3 


count 




..._ . — — 


Word 4 


Worn 


Word 5 


Id 



If a negative or zero word count is specified, an EX16 error 
message is posted and the task aborted. Any memory 
protection violation will result in an EX20 EX25 error 
message. 

Example: Pass the TIDB information into PBUF 

VfCTL EQU 0300 



P1 



LDA VSCTL 
STA P1 + 4 
PASS 29, ♦, PBUF 



(Get TIDB address) 



PBUF BSS 
END 



29 



could cause irrecoverable errors, so TBEVNT should be 
used with caution. 

The macro has the general form: 

label TBEVNT value, disp, c/s 

where: 



value 
disp 

c/s 



is 00177777 (mask) 

is the TtDB word ordinal number 
(displacement) to be altered 

is the clear/set indication 



Explanation: 

If disp * 0, the following is done according to the value 
parameter. If value is 0177776 it is set into the 
requesting task's TIDB event word, TBEVNT, If the value is 
017777, the request will fetch TBEVNT from the request 
er's TIDB and return with the A register set to the TBEVNT 
content. (See section 14 for information on use of the event 
word.) 

If disp f 0, the action depends on the c/s indication 
When c/s - 1 (i.e., set), the corresponding TIDB (word o^ 
number displacement) bits are set according to the ones in 
the mask value. 

When cfs%0 (i.e., reset), the corresponding TIDB (word /r/ , 
number displacement) are reset according to the zero bits 
In the mask value. 



Bit 15 14 13 12 11 10 9 • 7 * 5 4 3 2 1 


Word 
Word 1 
Word 2 
W«rd 3 
Word 4 
Word 5 


J S R,X 


0406 


J^X^^ 1 t 1 1 




vatu« 


ditp 


c/s 



Default values 
Example 



disp 



c/s 



Reset TBPL (word 2 of TIDB) bit 8 and then 
set it again. 

TBEVNT 0177377, 2, ,,A W £ (reset) 
TBEVNT 0400, 2, 1 ;o% (set) 



2.1.16 ALOCPG (Allocate Memory 
Paget) Macro 



2.1.15 TBEVNT (Set or Fetch TBEVNT) Macro 

This macro fetches or sets the requesting task's eyenj 
.wjgd, TBEVNT, as well as alters other TIDB entries. It 
should be noted here that most changes to TIDB entries 



This macro allocates in physical pages from the pool of 
available pages to logical pages starting at the specified 
logical address, modulo 01000. The logical pages to be 
mapped must not have been previously assigned The 
logical pages are assigned as read /write access mode. If an 
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CALL *rflL/>- 



error condition occurs, an EX27 error message is output 
and the task resumes operation at the specified reject 
address. The general form is 



label 



where 



ALOCPG n.togical addr.reject addr 



EX30 error message to be posted and the tasks operation 
resumed at the reject address. The general form is 



label 



where 



DEALPG 



n,togkal addr, reject addr 



logical 



is the number of pages to be allocated 

is the logical address, modulo 01000, 
where the n pages are allocated. If the 
logical address is negative (l's comple- 
ment) the address is assumed to be in 
map 0. If the logical address is positive, 
the address is assumed to be the 
requestor's map (priority tasks cannot 
allocate memory in map 0) 



n 
logical 



reject 



is the number of pages to be deallocated 

is the logical address, modulo 01000, 
where the n pages are deallocated if 
negative, l's complement of map 
logical address (illegal for priority 
tasks) 

is the error return address 



reject addr 



Expansion: 



Word 
Word 1 
Word 2 
Word 3 
Word 4 
Word 5 



is the error return address when a task 
exits or is aborted all ALOEPG pages are 

automatically deallocated. 



1* H 13 1? 11 10 9 B 7 6 5 4 3 2 1 

J S R.X 



9406 



1 



logical addr 



Expansion: 



Bit 


15 14 13 12 11 10 9 1 7 6 


5 4 3 2 10 


Word 
Word 1 
Word 2 
Word 3 
Word 4 
Word 5 


J S R.X 
0406 


-" 


"^xCL ° l 1 


">xCl 


n 




logical addr 




re) eel addr 





Example: Deallocate 4 pages of memory in the requesting 
task's virtual memory starting at logical address 06000. If 
error, go to ERR02. 



Example: Allocate 4 pages of memory to the requesting 
task's virtual memory starting at logical address 06000. If 
error, go to ERR01. 



ALOCPG 



4, 06000, ERR01 



DEALPG 4,06000,ERR02 



ERR02 



LDA 



(Error routine) 



ERR01 



STA 



(Error routine) 



2.1.17 DEALPG (Deallocate Memory 
Pages) Macro 

This macro deallocates n pages of memory starting at the 
specified logical address, modulo 01000 The deallocated 
logical pages are set to unassigned access mode Deallo 
cated physical pages, which were not assigned by MAPIN 
requests, are returned to the pool of available pages 
Specifying logical page or non read /write page results in 



2.1.18 MAPIN (Map-In Specified Physical 
Pages of Memory) Macro 

This macro allows the requestor to specify physical pages of 
memory to be assigned to the requestor's logical memory 
starting at the specified logical address, modulo 01000. 
Priority tasks are not permitted to execute the MAPIN 
request. The specified logical pages to be mapped must not 
have been previously assigned except by a previous MAPIN 
request. All logical pages are set to the read /write access 
mode P,i*es mapped in by this request do not effect the 
pool of i >ble pages. The requested physical pages 
cannoi inclu* p*ge nor any of the pages assigned to the 
nucleus program module. Any error condition causes EX31 
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to be output and the task resumed at the reject address. 
The general form is 



label 



MAPIN n.logteal addr, 

buffer or page, 
refect 



where 



logical 



is the number of pages of memory to be 
allocated 



is the requestor's logical address, 
modulo 01000, where the specified 
physical pages are to be mapped 



buffer address is the actual physical page number to 
or physical be mapped or the address of the buffer 
page number containing the physical page numbers. 
If the value is positive and less than 51 2. 
it is assumed to be a physical page 
number. If n is greater than 1 , all physi- 
cal pages assigned will be consecutive 
If the value is positive and greater than 
511, it is assumed to be a map buffer 
address, e.g., TIDB map image address 
If the value is negative, it is assumed 
to be the one's complement of the buffer 
address within the requestor's logical 
space, which contains the physical page 
numbers 



TASK A 


NAME 

TITLE 


TASKA 
TASKA 






FL 


EQU 


106 






KBY 


EQU 


0306 






VfCTL 


EQU 


0306 








LDBI 


ABUF 




(8 - Buffer Address) 




LDA 


VSCTL 




(A - Task As TIDB) 




SCHED 


2,0,FL 


KEY, 


TA.SK7B' 
(Schedule task B, pass 
parameters in A, B) 


ABUF 


BSS 

END 


02000 






TASK B 


NAME 

TITLE 


TASKB 
TASKS 






TAKING 


EQU 


27 






TASKB 


8TA 


p i + a 




(Set task As TtDO Jddr) 


P1 


PASS 


29 , * , PBUF 


(Pass task A$, HOB 










into PBUF) 


* 


T8A 
TZB 






(B - ABUF addr) 




LLSR 


9 




(A - Page number B - 
offset <n page} 




ADDE 


TRHING 


► PBUF 






STA 


MW5 




(Add task As map image 
addr 


HI 


MAPIN 
TBA 


2 , BBUF 


* 


(MAPIN same 7 phys.cal 
pages at BBUF shared by 
task A at A8UF) 




LSRA 


7 




(B - Offset into page) 




ADDI 


BBUF 




(Add BBUF addr) 




TAB 






(B * Start of ABUF) 


PBUP 


BSS 


29 




(TIDB buffer) 




■ SS 


TASKB- 


* + 5 12 


(Set to page boundary.! 


BBUP 


EQU 


* 




(Assume task B < 512 
words ) 



reject 



is the error return address 



Expansion: 



Bit 


15 14 


13 


17 tl 10 9 ?*343210 


Word 
Word I 
Word 2 
Word 3 
Word 4 
Word 5 
Word 6 


J S R.X 






0406 








1 10 




n 






logical addr 




buflor addr of pttywcal pat* 


reject addr 



Example: Copy the same 2 physical pages as used by task 
A, logical address ABUF, into task B's logical memory at 
logical address BBUF. Task A scheduled task B, passing 
task A's TIDB address to task B. 



2.1.19 PAGNUM (Identify Physical Page 
Number) Macro 



This macro allows the requestor to identify the physical 
page number assigned to a specified logical address. If an 
unassigned logical address is specified, return is to the 
requestor with the A register * 0. Otherwise, return is 
made with the A register set to the physical page number 
and the B register set to the task's map image address for 
the specified logical address. The general form is 



/*be/ 



PAGNUM logical addr 



where logical adtfr is the address where the identity of the 
assigned physical page is requested. 



9-11 



REAL-TIME EXECUTIVE SERVICES 



Expansion: 



Bit 


15 


14 


13 12 11 


10 9*76543 


2 


1 


Wort 
Word 1 
Word 2 
Word 3 


J S R.X 


0406 







10 11 










logical actor 







Example: Identify the physical page assigned to PBUF. 



LDAI PBUF (Get RBUF addr) 

8TA P1+3 

JM PAGNUM * (Identify physical page) 



PBUF BSS 100 



2.2 RTE SYSTEM FLOW 

The RTE component loads and executes a task depending 
on the category of that task: 



Executive Mode Tasks 

These are the VORTEX system and user tasks designated 
during system generation (SGEN) to be resident (excludes 
tasks specified on SGEN TSK directives). The RTE, IOC r I/O 
drivers, and common interrupt processors are examples of 
system executive mode tasks (map 0). OPCOM is loaded 
into and executed from page 1 of map 0. All other non 
resident tasks are defined to be user mode tasks. 



User Mode Tasks 



component designates an available map key (1 15) to 
the background task and sets the appropriate 
mapping registers to reflect the task's logical memory 



b. Background priority 1 tasks: System tasks such as the 
Job-Control Processor (JCP), Input/Output Utility 
(IOUTIL), System Maintenance (SMAIN), Source 
Editor (SEDIT), DAS MR, FORTRAN, RPG IV, MIDAS, 
MICSIM, and File Maintenance (FMAIN) require full 
access to the nucleus (to modify tables or utilize the 
global FCBs). These tasks are loaded with the 
required nucleus modules designated as read/write 
access mode permitting fetches and stores into these 
areas. The literal and indirect pointer pool is loaded 
in the first page at locations 0500-0777. The task is 
loaded starting at logical address 01000 



Foreground tasks: Page is mapped read operand only 
for a foreground task. Nucleus modules (including 
blank common) referenced by foreground tasks, are 
mapped in the read/write access mode (see figure 
2 1). The maximum logical memory space available to 
a foreground task is thus dependent on the number 
and type of nucleus module referenced by the task. 
The pages within the logical memory not utilized are 
mapped as unassigned. Atl foreground tasks are 
loaded at logical memory address 01000. 

Readonly pages: During the creation of a load module 
by LMGEN, the user has the capability to specify pages 
within the load module as read-only pages. The 
designated read only pages are indicated in the 
pseudo TIDB block. When the task is loaded, the RTE 
component wilt designate those pages in the tasks 
logical memory as read-only pages. 



2.3 TASK LIMITATIONS AND DIFFERENCES 

In VORTEX the following differences and features are 
apparent between a background task and a foreground 
task: 



a Background tasks with a priority of zero: Tasks that are 
executed via a DASMR or FORTRAN load and go 
operation and those that are loaded and executed 
from the BL library with a JCP/ LOAD directive are in 
this group. 

These tasks are loaded with the first page of physical 
memory (0-0777) designated as read operand only. The 
literal and indirect pointer pool is loaded in the first 
page at locations 05000777. The remainder of the 
background task is loaded in whatever physical pages 
are available at the time the task is loaded. These 
pages are designated as read/write access. If a 
nucleus module is referenced, that module is mapped 
as read operand only. Atl other pages in the logical 
memory are designated as unassigned. The RTE 



a. A background task has a priority level of or 1. A 
foreground task can have a priority of 2 through 31 . 



b. Only one background task can be executed at a time 
Excluding the RTE, IOC, and I/O driver tasks, a 
maximum of 15 (user mode of 1 through 15) user 
foreground tasks can be in operation concurrently, 
provided physical memory size is adequate. See 
section 2.5 for a description of checkpointing of tasks 



c. A background task can be checkpointed and its 
operation pre-empted by a foreground task, A 
foreground program memory space is not check 
pointed (see section 2.5). 
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d. A background task can have literals and indirect 
pointers, a foreground task cannot 

e. All tasks whether background or foreground have 
individual task protection. 

f. If allocable memory is not available to load a 
background task, the RTE component will output an 
error message (EX05) and abort the operation. If a 
foreground task is to be loaded and atlocatable 
memory is not available, the RTE component will 
reattempt the load when memory becomes available. 



Background level or 1 task can schedule a task from 
the background library only. Foreground tasks cannot 
schedule a task from the background library 



h. Foreground tasks can utilize foreground blank 
common. Background tasks cannot. 



Background level tasks have restricted RTE requests 
(see table 2-1). Foreground tasks have no restriction on 
RTE service requests. 



Background 
Priority 



Priority of Task 

Background 

Priority 



Foreground 
Priorities 



Nucleus Modules 

Foreground 
Blank COMMON 
Nucleus Module 



UN 



UN 



2-31 



RW 



Global FCT 
Nucleus Module 



ROP 



RW 



UN 



System Table 
Nucleus Module 



ROP 



RW 



RW 



System Resident 
Tasks Nucleus 
Module 



UN 



UN 



UN 



Page 

System Constants 



ROP 



RW 



ROP 



Key: RW Read Write Access Mode 

ROP Read Operand Only Access Mode 

RO Read Only Accets Mode 

UN Unassigned Access Mode 



Note: Stnce the upper three modules »re defined contigu 
ousty, without regard to page boundaries, and since maps 
are full pages, a map for any of these modules may include 
a partial page of an adjoining module, with the same 
access mode. 



Figure 2 1. Matrix of Nucleus Module Access Mode 
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2.4 ABORT PROCEDURE 

Whenever a task is aborted, att currently active I/O 
operations are allowed to complete. All I/O requests that 
are threaded (queued, or waiting to be activated) are not 
activated. Upon completion of alt active I/O operations and 
after all pending requests are dethreaded, the aborted task 
is released. 



2.5 CHECKPOINTING OF TASKS 

A background task's memory space and /or assigned map 
may be checkpointed for use by a foreground task. The 
background task is restarted when memory space and /or a 
map key becomes available. 

A foreground task may be checkpointed by a higher priority 
foreground task, ft may also be checkpointed by a lower 
priority task depending on the value of TBST bit 8. The 
default value of this bit is on (~l) i.e., "may be 
checkpointed by a lower priority task". In order to turn this 
bit off, a usage of TBEVNT (2.1.15) is recommended. The 
foreground task's memory space is never checkpointed. 
More than one foreground task's map may be 
checkpointed. 



2.6 PAGE ALLOCATION SCHEME 

The page allocation routine scans the page bit mask table, 
V$PAGE (figure 2-2) to determine the allocable physical 
pages. To expedite the process, the allocation routine first 
checks the page system word VSNPAG to find the total 
number of allocable pages in V$PAGE. If the required 
number of pages exceeds V$NPAG, scanning of VSPAGE is 
not attempted. The allocation routine scans V$PAGE 
starting with the word number specified in V$LPP (page 
system pointer). The system generation program initially 
sets V$LPP to 0. The allocation routine updates V$LPP 
during the scanning while the page deallocation routine 
sets V$LPP to the deallocated pages. 



Bit Position 
15 14 



2 10 



Word 


1 

2 
3 
3 
5 



29 
35 
31 
32 



Size of V$PAGE 


1 


Increasing Page 
Numbers 


15 


16 




.. ii 




-\o 




^ An 




ASK 




— c-> 




64 




— -70 




. , 


448 




463 


464 




479 








*¥tt 




»■- Jii 



First 
Physical 
32K Words 



Last 

Physical 
32K Words 
(Maximum 
256K) 



Corresponding Page Bit Positions: 

1 = Page is allocatable 

» Page is unallocatable 

V$PGT Address of V$PAGE 

V$LPP 0, Pointer to last word tested 

V$NPAG Number of available pages 

Figure 2-2 V$PAGE, Page Allocation Table 

The size of V$PAGE is determined by SGEN based on the 
physical memory size specified on the MRY directive. 
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The VORTEX input /output -control component (IOC) 
processes all requests for t/O to be performed on 
peripheral devices. The IOC comprises an I/O- request 
processor, a find- next-request processor, an I/O error 
processor, and 1/0 drivers. The IOC thus provides a 
common I/O system for the overall VORTEX operating 
system and eliminates the programmer's need to under- 
stand the computer hardware. 

All I/O wtth remote devices connected through the Data 
Communications Multiplexor (DCM) uses the VORTEX 
Telecommunications Access Method (VTAM). VTAM inter- 
faces with IOC. Use of VTAM is described in the VTAM 
Reference Manual. 

The contents of the volatile A and 6 registers and the 
setting of the overflow indicator are saved during execution 
of any IOC macro. After completion of the macro, these 
data are returned. The contents of the X register are lost. 

If a physical device failure occurs, the I/O drivers perform 
error recovery as applicable. Where automatic error 
recovery is possible, the recovery operation is attempted 
repeatedly until the permissible number of recovery tries 
has been reached, at which time the t/O driver stores the 
error status in the user I/O- request block, and the l/0-error 
processor posts the error on the OC logical unit. The user 
can then try an -.her physical device or abort the task. 

3.1 LOGICAL UNITS 

A logical unit is an I/O device or a partition of a rotating- 
memory device (RMD). It is referenced by an assigned 
number or name. The logical unit permits performance of 
I/O operations that are independent of the physical-device 
configurations by making possible references to the logical- 



unit number. The standard interfaces between the program 
and the IOC, and between the IOC and the I/O driver, 
permit substitution of peripheral devices in I/O operations 
without reassembling the program. 

VORTEX permits up to 256 logical units. The numbers 
assigned to the units are determined by their 
reassignability: 

a. logical-unit numbers I -100 are used for units that can 
be reassigned through the operator communications 
component (OPCOM, section 17) or the job-control 
processor (JCP, section 4). 

b. logical-unit numbers 101-179 are used for units that 
are not reassignabte. 

c. Logical unit numbers 1 80-255 are used for units that 
can be reassigned through OPCOM only. 

d. logical-unit number indicates a dummy device. The 
IOC immediately returns control from a dummy device 
to the user as if a real I/O operation had been 
completed. 

VORTEX logical unit assignments for all systems are 
specified in table 3-1. All logical-unit numbers that are not 
listed are available to the reassignability scheme above. 

Table 17 1 shows the scheme of system names for physical 
devices. Table 32 shows the possible logical unit 
assignments. 



Number 



1 



Table 3-1. VORTEX Logical-Unit Assignments 
Name Description Function 

DUM Dummy For I/O simulation 



OC 



SI 



SO 



PI 



Operator 
communication 



System input 



System output 



Processor input 



For system operator 
communication with immediate 
return to user control; 
Teletype or CRT only 

For inputs of all JCP control 
directives to any device 

For display of all input 
control directives and output 
system messages; Teletype or 
CRT only 

For input of source statements 
from all operating system 
language processors 



(continued) 
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Tabte 3-1. VORTEX Logical-Unit Assignments 

(continued) 



Number 



Nfcme 



Description 



Function 



LO 



List output 



Bl 



BO 



SS 



Binary input 



Binary output 



System scratch 



For output of operating system 
input control directives, 
system operations messages, 
and operating system language 
processors' output listings 

For input of object module 
records from operating system 
processors 

For output of object module 
records from operating system 
language processors 

For system scratch use; all 
operating system language 
processors that use an inter 
mediate scratch unit input 
from this unit 



10 



GO 



PO 



Go unit 



Processor output 



For output of the same infor 
mation as the BO unit by the 
system assembler and compiler; 
RMD partition or MT 

For processor output; all 
operating system language 
processors that use an inter 
mediate scratch unit output to 
this unit; PO and SS are 
assigned to the same device 
at system generation time 



n 


Dl 


Debugging input 


12 


DO 


Debugging output 


101 


CU 


Checkpoint untt 



102 



SW 



System work 



1( % 



CL "Core*' -resident 

library 



For all debugging inputs 

For all debugging outputs 

For use by VORTEX to 
checkpoint a background task; 
partition protection key S, 
RMD partition only 

For generation of a load module 
by the system load module 
generator component, or for 
cataloging, loading, or 
execution by other system 
components; partition protec- 
tion key B; RMD partition only 



For all "core" -resident system 
entry points; partition protec 
tion key C; RMD partition only 
(12 names per 2 sectors) 



3-2 



INPUT/OUTPUT CONTROL 



Table 3-1. VORTEX Logical-Unit Assignments 
(continued) 



Number 



104 



Name 



OM 



105 



BL 



Description 

Object module 
library 



Background library' 



Function 

For the VORTEX system object 
module library; partition 
protection key D; RMD partition 
only 

For the VORTEX system background 
library; partition protection 
key E; RMD partition only 



106 



FL 



Foreground library 



For the VORTEX system fore 
ground library; partition 
protection key F; RMD 
partition only 



* Other units can be assigned as user foreground libraries 
provided they are specified at system generation time. 
However, there is only one background library in any case. 



Table 3 2. Valid Logical-Unit Assignments 



Logical Unit 


OC 


SI 


SO 


PI 


LO 


Bl 


BO 


SS 


GO 


Unit No. 


1 


2 


3 


4 


5 


6 


7 


8 


9 


Device 




















Dummy 








DUM 


DUM 


DUM 


DUM 


DUM 




Card punch 










CP 




CP 






Card reader 




CR 




CR 




CR 








CRT device 


CT 


CT 


CT 


CT 


CT 










RMD (disc/drum) 




D 




D 


D 


D 


D 


D 


D 


partition 




















Line printer 










LP 










Magnetic tape unit 




MT 




MT 


MT 


MT 


MT 


MT 


MT 


Paper tape reader/ 




PT 




PT 


PT 


PT 


PT 






punch 




















Teletype 


TY 


TY 


TY 


TY 


TY 










Remote Teletype 




TC 


TC 


TC 


TC 










Logical Unit 


PO 


Dl 


DO 


CU 


sw 


CL 


OM 


BL 


FL 


Unit No. 


10 


11 


12 


101 


102 


103 


104 


105 


106 


Do vice 




















Dummy 


DUM 




DUM 














Card punch 


CP 


















Card reader 




CR 
















CRT device 


CT 


CT 


CT 














RMD (disc/drum) 


D 






D 


D 


D 


D 


D 


D 


partition 




















Line printer 


LP 




LP 














Magnetic-tape unit 


MT 


















Paper-tape reader/ 


PT 


















punch 








I 












Teletype 


TY 


TY 


TY 












Remote Teletype 




TC 


TC 
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3.2 RMD FILE STRUCTURE 



directory, eg., by a foreground program that is collecting 
data in real time ) Each directory entry is in the format. 



Each RMD (rotating memory device) is divided into up to 
20 memory areas called partitions. Each partition is 
referenced by a specific logical unit number. The bounda 
nes of each partition are recorded in the core resident 
partition specification table (PST). The first word of the 
PST contains the number of VORTEX physical records per 
track. The second word of the PST contains the address of 
the bad track table, if any, or zero. Subsequent words in 
the PST comprise the partition entries. Each PST entry is in 
the format 



Bit 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 


Word 
Word 1 
Word 2 

Word 3 


Beginning partition address (track number) 


ppb 




Protection key 


Number of bad tracks in the 
partition 


Ending partition address + 1 



Bit 


15 14 13 12 11 10 9 8 7 6 5 4 3 2 


1 


Word 
Word 1 
Word 2 
Word 3 
Word 4 
Word 5 


File name 


File name 


File name 


Current position of file 


Beginning file address 


Ending file address 



Section 9,1 describes the full PST format. 



The file name comprises six ASCII characters packed two 
characters per word. Word 3 contains the current address 
at which the file is positioned, is initially set to the ending 
file address, and is manipulated by thejOPEJM and CL0SE_ 
macros (sections 3.5.1 and 3.5 2). The extent of the file is 
defined by the addresses set in words 4 and 5 when the file 
is created, and which remain constant. 



The partition protection bit, designated ppb in the above 
PST entry map. when set, requires the correct protection 
key to read/write from this partition. 



Note that PST entries overlap Thus, word 3 of each PST 
entry is also word of the following entry. The length of the 
PST is 3n + 2, where n ;s the number of partitions in the 
system The relative position of each PST entry is recorded 
in the device specification table (DST) for that partition 



The bad-track table, whose address is in the second word 
of the PST, is a bit string constructed at system generation 
time and thereafter constant. The bits are read from right 
to left within each word, and forward through contiguous 
words, with set bits flagging bad tracks on the RMD 



Each RMD partition can contain a file-name directory of 
the liles contained in that partition. The beginning of the 
directory is in the first sector of that partition. The 
directory for each partition has a variable number of 
entries arranged in n sectors, 19 entries per sector Sectors 
containing directory information are chained by pointers in 
the last word of each sector. Thus, directory sectors need 
not be contiguous. (Note: Directories are not automati- 
cally created when the partitions are defined at system 
generation time. It is possible to use a partition with no 



At system generation time, the first sector of each partition 
is assigned to the file name directory and a zero written 
into the first word. Once entries are made in the file name 
directory the first word of each sector contains a count of 
the entries in that sector 



The last en.tr/in each sector is a one word entry containing 
either the value 01 (end of directory), or the address of the 
next sector of the file name directory, 



The filename directories are created and maintained by 
the VORTEX file maintenance component (section 9) for 
IOC use. User access to the directories is via the IOC, which 
references the directories in response to the I/O macros 
OPEN and CLOSE. The file maintenance component sets 
words 0, 1,2, 4. and 5 of each directory entry, which then 
remain constant and unaffected by IOC operations. The 
IOC can modify only the current position offile parameter. 



In the case of a file containing a directory, an OPEN is 
required before the file is accessible. The macro searches 
the file directory for the entry corresponding to the name in 
the file control block (FCB) in use When the entry is found, 
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the file boundary addresses and the current position of-file 
value from the directory entry are stored in the FCB. If the 
OPEN macro 



3.4 SIMULTANEOUS PERIPHERAL OUTPUT 
OVERLAP (SPOOL) 



Specifies the option to rewind, the FCB current position 
is set equal to the address of the beginning of file. 



Specifies the option not to rewind, the FCB current 
position is set equal to the address of the position of file. 



The VORTEX spooler is a generalized set of routines which 
permit queuing of a tasks output to intermediate RMD 
files. This avoids the user task waiting for the device 
transfer completion. Total system throughput will be 
increased because watting for transfers to be completed, 
both in the use of I/O calls with suspended returns and 
that of tasks which are terminating, will be minimized. 



Once a file is thus opened, READ and WRITE operations 
are enabled The IOC references the file by the file 
boundary values set by the OPEN, rather than by the file 
name. READ and WRITE operations are under control of 
the FCB current position value, the extent of the file, and 
the current record number. 



Also, nonresident tasks may transfer to a spooled device 
and immediately exit, instead of remaining resident until 
completion of the transfer. 



At system generation, the user may have the output of 
some logical units, such as LO, automatically spooled 
During operation, the operator may assign device outputs 
to the spooler through JCP or OPCOM assign directives. 



A CLOSE macro disables the IOC and user access to the file 
by zeroing the four ftle position parameters in the FCB. If 
the CLOSE macro 



Components 



Specifies the option to update, the current position of 
file value in the directory entry is set to the value of the 
FCB current position, allowing reference by a later 
OPEN. 



ti Specifies the option not to update, the file directory 
entry remains unmodified. 



Special directory entries. A blank entry is created when a 
fife name is deleted, in which case the file name is ****** 
and words 3 through 5 give the extent of the blank file. A 
zero entry is created when one name of a multiname file is 
deleted, in which case the deleted name is converted to a 
blank entry and all other names of the multiname file are 
set to zero. 



3.3 I/O INTERRUPTS 



VORTEX uses a complete, interrupt-driven I/O system, thus 
optimizing the allocation of CPU cycles in the multipro- 
gramming environment. 



The STOOL subsystem consists of two components: (1) an 
IOC driver to which data output may be assigned and which 
transfers output for its associated logical unit to a circular 
RMD file or directly to the output listing task, and (2) and 
output listing task which accepts messages from this 
circular RMD file or directly from the IOC driver and 
transfers them to the appropriate output device. 



Communication between these two tasks is accomplished 
through parameters within the listing rask which are 
established by the IOC driver. When these and other 
system parameters indicate that the listing task has caught 
up with the spoolout task, output messages will be 
transferred directly to the listing task, instead of going 
through the RMD SPOOL file (This avoids the overhead of 
two RMD transfers). 



AH data records transferred to the circular RMD file will 
contain record length and a key signifying whether the 
transfer is to be write or a function as well as other 
synchronization data. Data will be transferred to RMD in 
an unpacked mode (one record per sector) in order to avoid 
delays caused by unwritten still-to-be packed records. 
SPOOL file overflow messages will be output when approph 
ate after allowing the RMD circular file certain amounts of 
time to remove its oldest entry. 



Figure 3 1 shows a simplified flow of output data through 
the SPOOL subsystem. 
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USER 

TRANSFER TO 
LOGICAL UNIT 



SPOOLER IOC 
DRIVER 
fVZSPOA) 



CONTROLLER 
TABLE CTSPnA 



DATA DIRECTLY 
TO SPOOLOUT 
BUFFER 



TRANSFER IF 
SPOOL STREAM 
n* IS BUSY 



RESIDENT 
LISTER TASK 



RMD FILE 
SPOOL n* 



TRANSFER TO 
LOGICAL UNIT 

180 + n* 



!Mh® .^iPH* . 5* e Y! c,B J s not bu sy when a user request is 
made, an d_ ijjhe, RMD stream is inact jyeTthe u jeT^CJ? 
move d directly to th e output device via a SPOOL buffer , in 
this case, the user request is seT complete as~soon as the 
buffer is queued for the device. 

If a user's I/O requests are made and a spool pseudo 
device number for the appropriate SPOOLi file could not be 
found, of if the RMD is inoperative for any reason, the RMD 
is bypassed. That is, each user request causes a SPOOL 
buffer containing the user's data to be queued directly to 
the output device, up to a maximum of two buffers per 
stream. If the user should issue a ..reguest. Jhat _wpuld 
/equina, third buffer for that stream^ then the SPOO L 
driver enters a delay loop until thejw p buffer Ji mit cart-be 
satisfied . During this wait time, the user's I/O is active. 

If the output device to which a user is spooling output 
should go down or become not ready, data continues to be 
accepted and spooled to RMD, but not more than two 
SPOOL buffers will be tied up waiting for the device to 
become usable. If an RMD is down when this case occurs, 
user's requests will be delayed after two buffers are 
allocated to the stream. 

Should the user fill the RMD file for a stream with data 
before the device can catch up, the next user request 
remains active until space is available in the RMD. 



3.4.2 SPOOL Files 



* WHERE n IS AN INTEGER FROM ZERO TO SEVEN 



I'/Yi :;;i 



Figure 3-1. Spooling Subsystem Flow 



Certain RMD files are required for maximum spooler 
operation. Without these, the SPOOL subsystem will 
function at a reduced rate. Files SPOOL0 through SF*OOL7, 
where the last digit is the SPOOL stream number, are used 
as circular files and may be established at varying lengths 
to improve system performance. SPOOL operation will be 
slower if RMD files are totally filled with data to be output 



3.4.1 SPOOL Operation 

During the system generation, up to eight spool pseudo 
devices may be defined. These pseudo-devices, SPOA 
through SP7A are dummies which can be assigned to any 
logical unit used only lor output Such assignments can be 
made permanently at SGEN time, or dynamically through 
JCP or OPCOM. 

Each pseudo-device, SPiA, has a corresponding RMD file 
name, SPOOLi. These files must be defined on an RMD 
partition which is permanently assigned to logical unit 107 
(named SX), Each spoof pseudo-device and file is then 
associated with a logical unit (180 187) to which the 
LISTER writes unit record output. For example, a user 
issuing a WRITE request to an LUN assigned to device 
SPiA, will have data transferred to file SPOOLi on RMD. 

The data will be read from the RMD and written to LUN 
180 + i t whose name is Si, as time and the device allow 



Files must be created after SGEN but before the first user 
of the SPOOL program. To establish files in a manner 
consistent with SPOOL, an exact procedure must be 
followed. If LO is assigned to SPOOL, it must be reassigned 
temporarily to a non-spooled device through OPCOM using 
a command such as 

;ASSIGN,LO-LP 

where LP is not a spooled device. After this step, the actual 
file or files must be created using FMAIN in the following 
manner: 

/FMAIN 

INIT, 107, S 

CREATE, 107 , S, SPOOL0 , 120,n 

CREATE, 107, S, SPOOL 1 , 120,n 



CREATE, 10 7,S,SPOOL7, 120,n 
/FINI 



3-6 



INPUT/OUTPUT CONTROL 



The last parameter n of the CREATE directives is the 
number of records. A CREATE directive is required for each 
data stream. As many CREATE directives as data streams 
are required 



The number of 120-word records to be established within 
the file is given as the last parameter of the CREATE 
directive. SPOOL files are circular files; entries are being 
placed on one end while being removed from the other end. 
Wben the SPOOL subsystem determines that the file is full, 
i a,, that another entry cannot be placed on the file without 
destroying one which has not been removed, transfers to 
the spooler driver will not be completed until a new file 
entry becomes available (the oldest entry has been 
removed from the file). As file size is increased, the 
likelihood of a full file is decreased- File size should be a 
function of expected stream utilization and device output 
speed, which determines how quickly entries are moved 
from arcuiar spooler files. The 1060 error message 
indicates that a file is full. If this message is received 
frequently the number of records in that file should be 
increased for maximum spooling efficiency. 



This procedure for creation of SPOOL files needs to be 
done only once It is performed immediately after comple- 
tion of SGEN when the "VORTEX SYSTEM READY" mes- 
sage is output. If these tile sizes are found to be unsatisfac- 
tory, the system may be rebooted and file sizes modified 
by executing the procedure again 



OPEN 


Open file 


ClOSE 


Close file 


READ 


Read one record 


WRITE 


Write one record 


REW 


Rewind 


WEOF 


Write end of file 


SREC 


Skip one record 


FUNC 


Function 


STAT 


Status 


• . DCB 


Generate data control block 


FCB 


Generate file control block 



The IOC performs a validity check on all I/O requests. It 
then queues (according to the priority of the requesting 
task) each valid request to the controller assigned to the 
specified logical unit. Finally, the IOC schedules the 
appropriate I/O driver to service the queued request. 



The assembler processes the I/O macro to yield a macro 
expansion comprising data and executable instructions in 
the form of assembler language statements. 



As part of the SGEN for systems using the SPOOL program, 
controller table (stream 0) must be included since the 
initialization routine is included in its buffers. Additional 
controller tables may be included as desired. However, 
storage requirements may be varied by using different 
controller tables: all ever^ ad dr e sse s con tain . IflULZ&floidL 
buffers, and odd streams contain only two 74 word buffers. 
For systems with a large amount of SPOOL throughput, it is 
recommended that four buffers be specified for controller 
tables, otherwise two-buffer tables should be sufficient. 



Certain I/O operations require parameters in addition to 
those in the I/O macro These parameters are contained in 
a table, which, according to the operation requested, is 
called either a file control block (FCB, section 3.5. 11) or a 
data control block (DCB, section 3.5.10). Embedded but 
omitted parameters (e.g., default values) must be indicated 
by the normal number of commas. 



Error messages applicable to these macros are given in 
Appendix A3 



3.5 l/O-CONTROL MACROS 



I/O requests are written in assembly language programs as 
I/O macro calls. The DAS MR assembler provides the 
following I/O macros to perform I/O operations, thus 
simplifying coding: 



I/O Macros: The general form of I/O macros is. 

label name cb,lun, wait, mode 



where the symbols have the definitions given in section 
3.5.1. 



If the cb is for an FCB, it is mandatory. If it is for a DCB, it 
is optional. 
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The expansion of an I/O macro is: 



Bit 


15 


14 13 12 11 10 9 


I 


7 6 5 


4 J z 1 


Word 
Word 1 
Word 2 
Word 3 
Word 4 
Word 5 
Word 6 




J S R.X 






0*04 




c 


Status 


e 


cc 


Prionly* 


w 


Mod* 


Op code 


Logical ufnt number 




FCB of OCB address 






User task identification block address* 


IOC thread address* 



where 



Status 



set indicates completion of I/O tasks 

is the status of the I/O request 

set indicates an irrecoverable I/O 
error 

is the completion code 

is the priority level of the task 
making the request 

is the wait/ immediate-return option 

is the mode of operation 

specifies the I/O operation to be 
performed 

indicates an item whose initial 
value is zero 



The wait option causes the task to be suspended until its 
I /0 is complete. The immediate option causes control to be 
returned immediately to the task after the I/O request is 
queued. Therefore, to multiprogram effectively within 
VORTEX, the wait option is preferred. 



Priority 

w 

Mode 

Op-code 



Bits 4 through indicate the priority level of the task 
making the request 



Word 3 contains the following information: 
Bits 0-7 Logical Unit (LUN) 

When an I/O request is made to V$10C, V$I0C uses the 
LUN as an index into the logical unit table (LUT). V$I0C 
then uses the current assignment pointer of that entry in 
the LUT to determine the address of the DST on which the 
I/O is to be performed. To determine the OST address, the 
current assignment value less one is multiplied by the 
length of a DST (3 words) and added to the base address 
of the DST block. V$IOC verifies the validity of the specified 
LUN. 

If the LUN is invalid, a parameter error has occurred (refer 
to sections 3.1 and 3.3). 

Bits 8U OpCode 

Op-codes can range in value from to 15; however, not all 
op-codes are applicable for every device. V$I0C, using the 
op-code as an index gets an entry from a bit table. This 
' word contains a 1 in the bit position associated with the op 
code and is compared with the controller table item 
j CTOPM. If the corresponding bit in CTOPM is set to 1, it 
'means that the device connected to the controller can 
perform the requested operation. If the corresponding bit 
in CTOPM is zero, the I/O request is not performed, and 
the I/O complete indicator (bit 15) set. 



Bit 8-11 



Meaning 



0000 


Read 


0001 


Write 


0010 


Write EOF 


0011 


Rewind 


0100 


Skip record 


0101 


Function 


0110 


Open 


0111 


Close 


looonn 


Not used 



Word 2 contains the following information: 

a. Bit 1 5 indicates whether the I/O request is complete. 

b. Bits 14 through 9 contain one of the error-message 
status codes described in Appendix B.2 

c. Bit 8 indicates an irrecoverable I / error. 

d. Bits 7 through 5 contain a completion code: 000 
indicates a normal return; 101 , an error; 1 10, an end of 
fife, beginning of device, or beginning of tape; and 
111, end of device, or end of tape. 



Bits 12-14 Mode 

The mode bits are not used by V$I0C nor V$FNR. The I/O <„ 
driver use this information whenever applicable to the op 
code. 



Bit 15 Wait Option 

V$I0C uses this bit to determine whether the requesting 
task is to be suspended until I/O is completed or whether 
an immediate return is required 
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Bit 15-0 Suspend until I/O completed. V$IOC 

sets bit 14 in TBST in the requesting 
task's TIDB. 

Bit 15 * 1 Immediate return required (via V$DISP). 

V$IOC dears bit 14 in TBST in the 
requesting task's TIDB. 

Word 5 initially points to the user's task identification 
block. Upon completion of a READ or WRITE macro 
(sections 3.5.3 and 3.5.4), the IOC sets word 5 to the actual 
number of words transmitted. 

Status macro: The general form of the status (STAT) 
macro is: 



labei 



STAT 



req,err,aaa,bbb,busy 



where the symbols have the definitions given in section 

3.5.9. 

The normal return is to the first word following the macro 
expansion. 

The expansion of the STAT macro is: 



•H 


15 14 13 12 11 10 9 t 7 6 4 4 3 2 1 





wort a 

Word 1 
Word 2 
Word 3 
Word 4 
Word S 
Ward 6 


J S R.X 


0373 


Address of the I/O macro 


Address o* the I/O error routine 


■•a 


bob 


Address of the busy or I/O not complete routine 



where aaa is the address of the end of file, beginning of 
device or beginning of the tape routine and bbb is the 
address of the end of the tape or end of the device routine. 



Control block macro: The general form of the DCS macro 
is: 



label 



DCB 



rt,buf1,fun 



where the symbols have the definitions given in section 
3.5.10. 

The expansion of the DCB macro is: 



ttt 


15 


14 


11 12 11 10 M M 5 4 3 2 





Word 
Word 1 
Word 2 


Record length 






Direcl Address o( user data area 








Function code 





The function code applies only to I/O drivers that allow 

a. The line printer to slew to top of form or to space 
through the channel selection for paper-tape form 
control. 

b. The papor tape punch to punch leader. 

c The card punch to eject a blank card as a separator 

The general form of the FCB macro is: 

label FCB rebuff, acc.key.'xx'/yy'.'zz' 

where the symbols have the definitions given in section 
3.5.11 

The expansion of the FCB macro is: 



Bit 


15 


14 11 12 11 10 9 • 7 6 5 4 3 2 


1 


Word 
Word 1 
Word 2 
Word 3 
Word 4 
Word 5 
Word 6 
Word 7 
Word 8 
Word 9 


Record length 







Address of user data area 





Access method 


Protection hey 


Current record number 







Current end of Me address 




Beginning ftle address 




Ending tile address 


FHe name 
ftle name 
File name 



The access method (word 2, bits 15 through 8) specifies 
one of the four methods of reading or writing a file: 



Direct access by logical record: The I/O driver uses 
the contents of FCB word 3 as the number of the logical 
record within a file to be processed, but does not atter 
word 3 after reading or writing. Word 3 is set by the 
user to the desired record number prior to each read/ 
write. 

Specifying FCB word three to zero will cause access to 
the partition directory. Care should be taken when 
supplying this value so that directories are not 
accidentally destroyed. 



Sequential access by logical record: The I/O driver 
uses the contents of word 3 as the number of the logical 
record within a file to be processed, then increments 
the contents of word 3 by one. Word 3 is set initially 
to zero when the FCB macro expands. Successive 
reading and writing thus accesses records 
sequentially. 
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Direct access by physical record: The I/O driver uses 
the contents of FCB word 3 as the number of the 
VORTEX physical record to be processed within a file 
(120-word length), but does not alter word 3 after a 
read or write. Word 3 is set by the user to the desired 
record number prior to each read /write. 
Specifying FCB word three to zero will cause access to 
the partition directory. Care should be taken when 
supplying this value so that directories are not 
accidentally destroyed. 

Sequential access by physical record: The I/O driver 
uses the contents of FCB word 3 as the number of the 
VORTEX physical record to be processed within a file 
(120- word length), then increments the contents of 
word 3 by one. Word 3 is set initially to zero when the 
FCB macro expands. Successive reading and writing 
thus accesses records sequentially. 



The OPEN macro is file-oriented, while the REW macro is 
oriented to the logical unit. An REW destroys information 
completed by a previous OPEN on the same logical unit. 



The OPEN macro changes words 3, 4, 5, and 6 of the FCB 
(section 3.5.11). 



If an attempt is made to apply the OPEN macro to any 
device other than an RMD or a magnetic-tape unit, the I/O 
request is processed internally by the IOC but not by an 
I/O driver. The IOC indicates the status as I/O complete. 



Example: Read a 120-word record from the FI10 on logical 
unit 18, an RMD partition with sequential, record-oriented 
access. BUFF is the address of the users buffer area Use 
the wait and rewind options, and set the logical-unit 
protection key to 1. 



3.5.1 OPEN Macro 



This macro, which applies only to RMDs or magnetic-tape 
units, enables I/O operations on the devices by initializing 
the file information in the specified FCB. The macro has 
the general form 



where 



label 

tcb 

tun 

waff 



OPEN 



fcb, tun. wa/f mode 



is the address of the file control block 

is the number of the logical unit being 
opened 

is 1 for an immediate return, or 
(default value) for a return suspended 
until the I/O is complete 



X1 


EQU 


18 


RL 


EQU 


120 


WAIT 


EQU 





REW 


EQU 





KEY 


EQU 


1 


SEQR 


EQU 


1 


OPEN 


OPEN 


FCB,X1 


READ 


READ 


FCB, XI 



(LUN assigned to unit XI) 
(Record length 120) 
(Wait option) 
(Rewind option) 
(Logical-unit protection key) 
(Sequential, record oriented 
access) 
WAIT, REW 
WAIT 



FCB FCB RL, BUFF, SEQR, KEY, 

'FI' , ' 10' ' ' 



mode is (default value) for rewinding or 1 for 

not rewinding In the former case, word 
3 (current record number) of the FCB is 
set to 1, word 4 (current position-off ile 
address) is set to the current position of 
file address given by the RMD file 
directory, and rewinds the magnetic 
tape unit. In the latter case, the current 
position of file address given by the 
RMD file directory is copied into word 4, 
converted to a record number and 
stored in word 3 of the FCB, thus 
initializating the user FCB, enabling 
reading or writing from a previously 
specified location, and the magnetic- 
tape position is left unchanged (not 
rewound). 

OPEN must precede any other I/O request (except REW) 
because the FCB file information must be complete before 
any file oriented I/O is possible. If a file has already been 
opened, an OPEN will be accepted. 



3.5.2 CLOSE Macro 

This macro, which appltes only to RMDs or magnetic tape 
units, updates information in the specified FCB file. This 
records and retains the current position within the file. The 
mode option ignores the updating, thus retaining the 
previously defined position in the file The macro has the 
general form 

label CLOSE fcb,lun,wart, mode 



where 



fcb is the address of the FCB 

tun is the number of the logical unit being 

closed 

wait is 1 for an immediate return, or 

(default value) for a return suspended 
until the I /O is complete 



3 10 



INPUT/OUTPUT CONTROL 



mode is (delault value) tor not updating, or 1 

for updating In the former case, there is 
no change to the current position offile 
address in the RMD file directory, words 
3, 4, 5, and 6 of the FCB are set to zero, 
and the magnetic tape position is left 
unchanged (not rewound) In the latter 
case, the contents of FCB word 3 
(current record number) are converted 
to an address and stored in the current 
position of file address in the RMD file 
directory, words 3, 4, 5, and 6 of the FCB 
are set to 2ero, and an end of file mark 
written on the magnetic tape. 

The CLOSE macro cannot be used if there is no such file 
defined in the FCB (section 3.5.11). 



The number of words read is stored in word 5 of the 10 "^» 
inacro. *""* 

Example: Read a record from logical unit 4, a magnetic 
tape unit. Use system binary mode and the immediate 
return option. The record length is 60 words, and the 
address of the user's data area is BUFF 



IM 


EQU 


1 


(Immediate return) 


BIN 


EQU 





(System binary mode) 


MT 


EQU 


a 


(LUN assigned to 
magnetic-tape unit) 


RECL 


EQU 


60 


(Record length 60 words) 



MTRD 



READ 



TAPE.MT, IM.BIN 



If an attempt is made to apply the CLOSE macro to any 
device other than an RMD or magnetic tape unit, the I/O 
request is processed internally by the IOC, but not by an 
I/O driver The IOC indicates the status as I/O complete. 

Example: Close the file MATRIX on logical unit 180, an 
RMD partition with sequential, record-oriented access. Use 
the wait and update options. 



SEQR 


EQU 


1 


(Sequential, record 


UPDATE 
WAIT 


EQU 
EQU 


1 



oriented access) 
(Update option) 
(Wait option) 



CLOSE CLOSE FCB , 1 80 , WAIT , UPDATE 



TAPE DCB RECL, BUFF (Data control block) 

BUFF BSS 60 (User data area) 

Note that the READ macro had a mode value of zero. Since 
this is the default value, the macro could have been coded: 



MTRD 



READ 



TAPE,MT, IM 



3.5.4 WRITE Macro 

This macro takes a record of specified length from the 
specified area of main memory, and transmits it to the 
specified logical unit. The macro has the general form 



label 



WRITE 



cbjun, watt, mode 



FCB 



FCB 



i i PBTS i i 



, SEQR, , 'MA' , " TR 



IX' 



3.5.3 READ Macro 



This macro retrieves a record of specified length from the 
specified logical unit, and places it in the specified area of 
main memory. The macro has the general form 



label 



where 



READ 



cb,lun,wait,mode 



where the parameters have the same definitions and take 
the same values as in the READ macro (section 3.5.3). 

The numbe r of words written is stored in word 5 of the I/O 
macro^ The first byte of each print line is treated as a print 
control character and not echoed w hen outp utting to a 
listing device 



Example: Obtain a system binary record 60 words in 
length from the users data area BUFF, and transmit it to 
logical unit 16, a magnetic tape unit. Use the immediate 
return option 



cb 



tun 



is the address of the data control block, 
or of the file control block 

is the number of the logical unit from 
which the record is read 



IM 


EQU 


1 


(Immediate return) 


BIN 


EQU 





(System binary mode) 


MT 


EQU 


16 


(LUN assigned to magnetic 
tape unit) 


RECL 


EQU 


60 


(Record length 60 words) 



wait is 1 for an immediate return, or 

(default value) foc.aj'ejturn sus pended 
until ffi e j /O is complete 



MTWT WRITE TAPE , MT , IM , BIN 



mode specifies the I/O mode: (default value) 

for system binary, 1 for ASCII, 2 for BCD, 
or 3 for unformatted I/O (see appendix 
C for format) 



TAPE DCB RECL, BUFF (Data control block) 

BUFF BSS 60 (User data area) 
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3.5.5 REW (Rewind) Macro 

Ihvs macro, which applies only to magnetic tape or 
rotating memory devices, repositions the specified logical 
unit to the beginning of unit position It has the general 

form 

label REW cb.lun.warf 

where 

cb is the address of the FCB or DCB, which 

is opbonal 

lun is the number of the logical unit being 

rewound 

wait is 1 for an immediate return, or 

(default value) for a return suspended 
until the I/O is complete 

Note that the DCB address is an optional parameter, but 
that the FCB address is mandatory. 

To reposition a named file on an RMD, use the OPEN 
macro (section 3.5.1). 

Magnetic-tape devices REW rewinds the specified unit 
and. upon successful completion of the task, returns a 
beginning of device (BOD) status 

Rotatmg-memory devices REW places the start RMD 
partition and end-RMD partition addresses in words 5 and 
6, respectively, of the FCB (section 3.5.11). 

Examples: Rewind logical unit 23, a magnetic tape unit 
Use the wait option, here specified by default 

MT EQU 2 3 (LUN assigned to magnetic 

tape unit) 



3.5.6 WEOF (Write End of File) Macro 

This macro writes an end of file on the specified logical 
unit. It has the general form 



where 



label 

cb 
lun 

wait 



WEOF 



cb, lun, waif 



is the address of the control block 

is the number of the affected logical unit 

is 1 for an immediate return, or 
(default value) for a return suspended 
until the I/O is complete 



Example: Write an end of file on logical unit 10. Use the 
wait option, here specified by default 



TAPE 



EOF 



EQU 



WEOF 



10 



CB,TAPE 



3.5.7 SREC (Skip Record) Macro 

This macro, which applies only to magnetic tape, card 
reader, or rotating memory devices, skips one record in 
either direction on the specified logical unit. It has the 
general form 



label 



SREC 



cbjun, wart, mode 



where 



REWT 



REW 



,MT 



Rewind logical unit 10, an RMD partition. Use the wait 
option, here specified by default. Note that the REW for an 
RMD must have an associated FCB (section 3.5.11). 



DISC 


EQU 


10 


(LUN assigned to RMD 
partition) 


RBCL 


EQU 


120 





REWD 



FCB 



BUFF 



REW 



FCB 



BSS 



FCB, DISC 



RECL,BUFF, , 

(section 3.5.11) 
120 



SY 



ST' , ' EM 



cb is the address of the control block 

lun is the number of the logical unit being 

manipulated 

waif is 1 for an immediate return, or 

(default value) for a return suspended 
until the I /O is complete 

mode specifies the direction of the skip 

(default value) for a forward skip, or 1 for 
a reverse skip. Reverse skip does not 
apply to the card reader. 

If applied to an RMD, SREC adds or subtracts from the 
value of word 3 of the FCB (section 3.5.11) 

If an^attempt ts made_to _apply this macro to a device othe r 
than a magnetic tape or rotating- memory unit, the j/0 
request is processed internally by the IOC butTtot bv an 
I/O driver. The IOC indicates the status as I/O complete 
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Example: Skip back one record on logical unit 57, a 
magnetic tape unit. Use the immediate-return option. 



MT 

REV 
IM 



SKIP 



EQU 

EQU 
EQU 



SREC 



5 7 (LUN assigned to magnetic 

tape unit) 
t (Reverse) 
1 (Immediate return) 



CB,MT,IM,REV 



3.5.8 FUNC (Function) Macro 



This macro performs a miscellaneous function on a 
specified logical unit. The function (when present) cannot 
be defined by any of the preceding I/O control functions. 
The macro has the general form 



Function 




I/O Driver Code 


Function 


Statos 31/42 00 


Advance paper to top 




of form 


01 


Advance paper one line 


02 


Advance paper two lines 


07 


Advance paper to bottom 




of form 


08 


Step plotter one raster 




line 


10 


Select small/upright 


11 


Small/ +90 degrees 


12 


Small/ 180 degrees 


13 


Smalt/ -90 degrees 


14 


Large/upright 


15 


Large/ +90 degrees 


16 


Large/ 180 degrees 


17 


Large/ -90 degrees 


20 


Cut paper 


21 


End cut 



where 



labei 

deb 
lun 

watt 



FUNC 



dcb t Hjn,wait 



is the address of the data control block 

is the number of the logical unit being 
manipulated 

is 1 for an immediate return, or 
(default value) for a return suspended 
until the I /O is complete 



FUNC causes certain I/O drivers to perform special 
functions specified by the function code fun in a DCB 
macro (section 3. 5.10): 



Plot data may be transmitted to the Statos 31 by specifying 
unformatted mode, 3, in the WRITE macro. Each 1 bit will 
cause a dot to be printed in its corresponding position in 
the output line. The most significant bit in the first word 
output r^pr^sents the left most dot position. 



Statos 31/42 The WRITE macro enables the transfer 
of one data buffer to the printer/ 
plotter and allows for five different 
modes of operation: 

Mode 1 Compatible line printer 

(70-6701) mode 

Mode 3 Plot (raster) mode (binary 

raster data transfer) 



I/O Driver 


Function 
Code 


Function 


Card punch 





Eject blank card 


Paper-tape punch 





Punch 256 blank frames 
for leader 


Line printer and 
Teletype printer 




1 

2 


Advance paper to top of 
next form, or or\ Tele- 
type 3 lines x 
Advance paper one line 
Advance paper two lines 


Statos 31 


7 


Advance paper to bottom 
of form 




8 
9 


Normal print size* 
Large print size* 



*Only for software character generator. 



Mode 4 » Print mode selectable size 
and orientation 

Mode 5 -- Simultaneous print /plot 

mode (ASCII data transfer) 



Mode 6 Simultaneous print/plot 

mode (binary raster data) 



AH other modes default to mode 1 



If an attempt is made to apply the FUNC macro to any 
other device, the I/O request is processed internally by the 
IOC but not by an I/O driver. The IOC indicates the status 
as I/O complete. 
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Example: Skip two lines on the printer, which is logical 
unit 5 Use the wait option, here specified by default. 



LP 


EQU 


5 


(LUN assigned to It 


CNT 


EQU 


2 


printer) (Paper tape 
channel 2) 



UPSP FUNC DCB, LP 



DCB 



DCB 



CNT 



3.5.9 STAT (Status) Macro 

This macro examines the status word in an I/O macro to 
determine the result of an I/O function request. The STAT 
macro has the general form 



where 



label 



req 



STAT 



req t err,aaa,bbb,busy 



bbb 



busy 



is the address of the I/O macro (eg. 
READ) 



is the address of the l/O-error routine 

is the address of the end of file, 
beginning of device, or beginning of 
tape routine 

is the address of the end of device or 
end of tape routine 



All parameters (except the label) are mandatory. The 
contents of the overflow indicator and the A and B registers 
are saved. Upon normal completion, control returns to the 
user at the first word after the end of the macro expansion. 



Example: Rewind logical unit 12, a magnetic tape unit, 
and check for beginning of device (toad point). Use the 
immediate return option. 



12 (LUN assigned to magnetic- 

tape unit) 
1 (Immediate return) 



r MT f IM (DCB can be omitted 
for REW) 



REW , ERR , BOT , EQT , BUSY 



MT EQU 

IM EQU 

REW REW 

BUSY STAT 

BOT 

ERR 



3.5.10 DCB (Data Control Block) Macro 

This macro generates a DCB as required by I/O macro 
requests to devices other than RMDs. Note that not all 
such requests (e.g., rewinding a magnetic-tape unit) 
require a DCB. The macro has the general form 



label 



DCB 



rt,buft,fun 



where 



bull 



fun 





IM 


EQU 


1 


is the address of the I/O not-complete 


BIN 


BQU 





routine 


MT 


EQU 


4 



is the length, in words, of the record to 
be transmitted 

is the address of the user's data area 

is the function code for a FUNC request 
and is unused for other requests (section 
3.5.8) 

Example: Read a record from logical unit 4, a magnetic 
tape unit. Use system binary mode and the immediate 
return option. The record length is 60 words, and the 
address of the user's data area is BUFF. 



(Immediate return) 
(System binary mode) 
(LUN assigned to magnetic 
tape unit) 
EQU 60 (Record length 60 words) 



READ TAPE, MT,IM, BIN 



RECL 



MTRD 



CAUTION 

Foreground tasks should not loop to check for 
completion of I/O tasks because this inhibits all 
lower-level tasks. 



TAPE DCB RECL, BUFF (Data control block) 

3.5.11 FCB (File Control Block) Macro 

This macro generates an FCB required by any I/O macro 
request to an RMD. The macro has the genera* form 
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where 



label 

r\ 

buff 
ace 



FCB 



ri, buff, ace, key, 'xx \ 'yy\ 'zz' 



key 



xxyyzz 



is the length, in words, of the record to 
be transmitted 

is the address of the user's data block 

specifies the access method and is 
(default value) for the direct access by 
logical record, 1 for sequential access 
by logical record, 2 for direct access 
using the relative sector number 
(beginning with 1) within the file, or 3 for 
sequential access using the relative 
sector number within the file 

is the protection code, if any, required to 
address that logical unit. This is a single 
alphanumeric ASCII character coded 
between single quotation marks (e.g., 
the protection code H would be coded 
' H 1 ) or as the eight-bit octal equivalent, 
in which case no quotation marks are 
used (e.g.* 0310 for the protection code 
H). The default value is binary zero (not 
the character 0). 

is the name of the file being referenced. 
The file name is one to six ASCII 
characters, coded in pairs between 
single quotation marks and separated 



by commas, e.g., the file named ARRIBA 
is coded ' AR' , ' RI' , ' BA' . Embedded 
blanks are illegal. 

Table 3-3 shows the use of FCB words 3, 4, 5, and 6 for the 
I/O macros. 

Example: Create an FCB for the file FILEXX. Use the 
logical record oriented, sequential-access method with a 
record length of 120 words. The user's data area is BUFF 
and the protection code is Z. 



SEQR 


EQU 


1 


(Sequential, record 
oriented access) 


RBCL 


BQU 


120 


(Record length 120 




• 




words) 



DISC 



BUFF 



FCB 



BSS 



RECL.BUFF, SBQR 
*FI ' , *LB' , 'XX* 



120 



Note that the protection code character 2 is coded between 
single quotation marks, i.e., Z\ but it can also be coded as 
the octal value of the ASCII character, in which case no 
quotation marks are used, i.e., 0332. Thus, the statement 
given in the example above is equivalent to 
DISC FCB RBCL, BUFF, SBQR, 

0322, 'FI* , 'LB* , 'XX' 



Table 3-3. FCB Words Und€t I/O Macro Control 



Word OPEN READ WRITE SREC CLOSE 

Sequential-Access Method 



REW 



Set to 
position 
of cur 
rent rec- 
ord by 
mode 
chosen 



Incre- 
ments 
record 
number 
by one 



Incre- 
ments 
record 
number 
by one 



Adds or 

subtracts 

one 



Put into 
position 
of file 
on direc- 
tory by 
mode 
chosen 



Current 
record set 
(directory 
partition) 
to one or 
beginning 
address of 
logical 
unit (non- 
directory 
partition) 



Set to 


Checks 


No 


Checks 


current 


end of 


action 


end of 


position 


file 




file 


of file 








as noted 








on direc- 








tory 









Cleared 



Set to 
ending 
address 
of logi- 
cal unit 
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Table 3-3. FCB Words Under I/O Macro Control (continued) 

CLOSE 



Word 


OPEN 


READ 


WRITE 


SREC 


5 


Set to 


No 


No 


No 




beginning 


action 


action 


action 




of file 










address 










put in 










this word 









Cleared 



Set to 


No 


No 


No 


end of 


action 


action 


action 


file ad 








dress 









Set to 

position 
of cur 
rent rec 
ord by 
mode 
chosen 



Cleared 



Direct-Access Method 



No 
action 



No 

action 



No 
action 



Put into 
position 
of file 
on direc- 
tory by 
mode 
chosen 



Set to 


No 


No 


No 


current 


action 


action 


action 


position 








of file 








as noted 








on direc- 








tory 








Set to 


No 


No 


No 


beginning 


action 


action 


action 


of file 








address 









Cleared 



Cleared 



Set to 


No 


No 


No 


end of 


action 


action 


action 


file ad 








dress 









Cleared 



Set to 
beginning 
address 
of logi- 
cal unit 
(non- 
directory 
partition) 

Set to 
ending 
address 
of logi- 
cal unit 



Current 

record set 

(directory 

partition) 

to one or 

beginning 

address of 

logical 

unit (non- 

directory 

partition) 

Set to 
ending 
address 
of logi- 
cal unit 



REW 

Skip first 

directory 

sector 

(directory 

partition) 



Set to 


Skip first 


beginning 


directory 


address 


sector 


of logi- 


(directory 


cal unit 


partition) 


(non- 




directory 




partition) 




Set to 




ending 




address 




of logi- 




cal unit 
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SECTION 4 

JOB-CONTROL PROCESSOR 



The job-control processor (JCP) is a background task that 
permits the scheduling of VORTEX system or user tasks for 
background execution. The JCP also positions devices to 
required files, and makes logical unit and l/Odevice 
assignments. 

4.1 ORGANIZATION 

The JCP is scheduled for execution whenever an unsolicited 
operator key-in request to the OC logical unit has a slash 
(/) as the first character. 

Once initiated, the JCP processes all further JCP directives 
from the SI logical unit. 

II the St logical unit is a Teletype or a CRT device, the 
message JC** is output to indicate the SI unit is waiting 
for JCP input. The operator is prompted every 15 seconds 
(by a bell for the Teletype or tone for the CRT) until an 
input is keyed in. 

If the SI logical unit is a rotating memory-device (RMD) 
partition, the job stream is assumed to comprise unblocked 
data. In this case, processing the job stream requires an 
/ASSIGN directive (section 4.2.6). 

A JCP directive has a maximum of 80 characters, 
beginning with a slash. Directives input on the Teletype are 
terminated by the carriage return. 

All JCP directives are echoed to the SO logical unit if SI ^ 
SO. All directives, except /C and /P have the time of day 
append onto the front of the directive when echoed to SO. 
The format is 

HH MM.SS /JCP directive 



4.2 JOB-CONTROL PROCESSOR DIRECTIVES 

This section describes the JCP directives: 

a. Job initiation/termination directives: 

/JOB Start new job 

/ENDJOB Terminate job in progress 

/FIN I Terminate JCP operation 

/C Comment 

/P Pause 

/MEM Allocate extra memory for 
background task 

b. l/O-device assignment and control directives: 

/ASSIGN Make logical-unit assignment(s) 
/SFILE Skip file(s) on magnetic tape unit 



/SREC Skip record(s) on magnetic tape unit 

or RMD partition 
/WEOF Write end-of-file mark 

/REW Rewind magnetic-tape unit or RMO 

partition 
/PFILE Position rotating memory unit file 

/FORM Set line count on LO logical unit 

/KPMODE Set keypunch mode 
/OPEN Open VTAM line or terminal 

/CLOSE Close VTAM line or terminal 

/CFILE Close file on global logical unit 



c Language-Processor directives 

/DASMR Schedule DAS MR assembler 
/FORT Schedule FORTRAN compiler 

d. Utility directives: 

/CONC Schedule system concordance program 

/SEDIT Schedule symbolic sourceeditor task 

/FMAIN Schedule file maintenance task 

/LMGEN Schedule load-module generator 

/IOUTIL Schedule I/O utility processor 

/SMAIN Schedule system maintenance task 



e Program loading directives: 

/EXEC Schedule loading and execution of a 

load module from the SW unit file 

/LOAD Schedule loading and execution of a 

user background task 

/ALTLIB Schedule the next background task 

from the specified logical unit 
rather than from the background 
library 

/DUMP Dump background at completion of 

task execution 



JCP directives begin in column 1 and comprise sequences 
of character strings having no embedded blanks. The 
character strings are separated by commas (,) or by equal 
signs ( «= ). The directives are free-form and blanks are 
permitted between the individual character strings of the 
directive, i.e., before or after commas (or equal signs). 
Although not required, a period (.) is a line terminator. 
Comments can be inserted after a period 

Each JCP directive begins with a slash (/). 



The general form of a job control statement is 

/name,p(I),p(2). ..p(n> 
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where 



name 



each p(n) 



is one of the directive names given (any 
other character string produces an 
error) 

is a parameter required by the JCP or by 
the scheduled task and defined below 
under the descriptions of the individual 
directives 



The occurrence of the /ENDJOB directive causes the 
scheduling of the background task V$ACT2. V$ACT2 is a 
dummy task on BL which only performs an EXIT. However, 
V$ACT2 may be replaced by a user task to perform any 
desired accounting function. 

Example: Terminate the |ob in process. 
/ENDJOB 



Numerical data can be octal or decimal. Each octal number 
has a leading zero. 

For greater clarity in the descriptions of some directives, 
optional periods, optional Wank separators between 
character strings, and the optional replacement of commas 
by equal signs are omitted from descriptions 

Error messages applicable to JCP directives are given 
Appendix A.4 



4.2.3 /FINI (Finish) Directive* 

This directive terminates all JCP background operations 
and makes an EXIT request to the real-time executive RTE 
component (section 2.L11). It has the form 

/FINI 

To reschedule JCP after a FINI, input any JCP directive 
from the OC unit 



4.2.1 /JOB Directive" 

This directive initializes all background system pointers 
and ftags, and stores the job name if one is specified. It 
has the general form 



The occurrence of the /FtNt directive causes the scheduling 
of the background task V$ACT3. V$ACT3 is a dummy task 
on BL which only performs an EXIT. However, V$ACT3 may 
be replaced by a user task to perform any desired 
accounting function. 



/JOB, name 

where name is the name of the job and comprises up to 
eight ASCII characters (additional characters are permitted 
but ignored by the JCP). 

The job name, if any, is then printed at the top of each 
page for all VORTEX background programs 

The occurrence of the /JOB directive causes the scheduling 
of the background task V$ACT1. V$ACT1 is a dummy task 
on BL which only performs an EXIT However, V$ACT1 may 
he replaced by a user task to perform any desired 
accounting function 



Example: Initialize the job TASKONE 
/JOB , TASKONE 



Example: Terminate JCP operations 
/FINI 



* The JCP directives JOB, ENDJOB, and FINI reset all 
logical units and table 1 units to their default (system) 
values. JOB and ENDJOB do not set the SI logical unit. 



4.2.4 /C (Comment) Directive 

This directive outputs the specified comment to the SO and 
LO logical units, thus permitting annotation of the listing It 
is not otherwise processed It has the general form 



4.2.2 /ENDJOB Directive* 



This directive initializes all background system pointers 
and flags, and clears the |ob name, it has the form 

/ENDJOB 



/C, comment 

where comment is any desired free-form comment. 

Example: Annotate a listing with the comment Rewind all 
mag tapes. 

/C, REWIND ALL MAG TAPES 
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4.2.5 /MEM (Memory) Directive 

This directive assigns additional 512 word blocks of mam 
memory to the next scheduled background task It has the 
general form 

/MEM.n 

where n is the number of 512 word blocks of main memory 
to be assigned. 

/MEM permits larger symbol tables for FORTRAN compila 
tions and DAS MR assemblies. 

The total area of the 512 word blocks of memory plus the 
background program itself cannot be greater than the total 
area available for background and nonresident foreground 
tasks. An attempt to exceed this limit causes the scheduled 
task to be aborted. 

Example: Allocate an additional 1,024 words of main 
memory to the next scheduled task. 

/MEM. 2 



4.2.7 /SFILE (Skip File) Directive 

This directive, which applies only to magnetic tape units 
and card readers, causes the specified logical unit to move 
the tape forward the designated number of end-of file 
marks. It has the general form 



/SFILE.Iun.neof 



where 



lun 



neof 



is the number or name of the 
affected logical unit 

is the number of end-of-file 
marks to be skipped 



If the end of tape mark is encountered before the required 
number of files has been skipped, the JCP outputs to the 
SO and LO logical units the error message JCOS.nn, where 
nn is the number of files remaining to be skipped 

Example: Skip three files on the Bl logical unit, 

/SFILE, BI, 3 



4.2.6 /ASSIGN Directive 

This directive equates and assigns particular logical units 
to specific I/O devices. It has the general form 

/ASSIGNED * t(\),\(2) » r(2), ..,l(n) = r(n) 

where 

each Kn) 



each r(n) 



is a logical-unit number (e.g., 102) 
or name (e.g., St) 

is a logical-unit number or name, or 
a physical-device system name (e.g., 
TY00, table 17 1) 



4.2.8 /SREC (Skip Record) Directive 

This directive, which applies only to magnetic tape units, 
card readers, and RMDs, causes the specified logical unit 
to move the tape the designated number of records tn the 
required direction tn the case of RMDs, word 4 of the FCB 
is adjusted the appropriate number of records It has the 
general form 

/SREC.Iun.nrec. direc 

where 



The logical unit to the left of the equal sign in each pair is 
assigned to the unit/device to the right. 

If the controller and unit numbers are omitted from the 
name of a physical device, controller and unit are 
assumed. 

An inoperable device, i.e., one declared down by the 
;DEVDN operator key in request (section 17.2.10), cannot 
be assigned. A logical unit designated as unassignable 
cannot be reassigned 



lun is the number or name of the 

affected logical unit 

nrec is the number of records to be 

skipped 

direc indicates the direction to be 

skipped; F (default value) for 
forward, or R for reverse. 
Reverse skip does not apply to 
the card reader 



Example: Assign the PI logical unit to card reader CR00 
and the LO logical unit to Teletype TY00 

/ASSIGN , PI-CR, LO-TY 



It a file mark, end of tape, or beginning of tape s 
encountered before the required number of records has 
been skipped, the JCP outputs to the SO and LO logical 
units the error message JC05,nn, where nn ts the number 
of records remaining to be skipped. 
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Example: Skip nine records forward on the BO logical 

unit. 

/SREC,BO,9 



4.2.9 /WEOF (Write End of File) 
Directive 

This directive writes an end of file mark on the specified 
togtcal unit It has the general form 

/WEOF, Kin 

where tun is the number or name of the affected logical 
unit (Not accepted for RMD.) 

Example: Write an end-of-file mark on the BO logical unit 
/WEOF, BO 



4.2.10 /REW (Rewind) Directive 

This directive, which applies only to magnetic tape units 
and RMOs, causes the specified logical unit(s) to rewind to 
the beginning of tape. It has the general form 

/REW.hin.fun. Jun 

where lun ts the number or name of a logical unit to be 
rewound 



Example: Rewind the BO and PI logical units. 
/R£W,BO,PI 



4.2.11 /PFILE (Position File) Directive 

This directive, which applies only to RMDs and MT 
assigned to global logical units causes the specified logical 
unit to move to the beginning of the designated file. It has 
the general form 

/ PFILE.kjn, key, name 



key is the protection code required 

to address lun 

name is the name of the file to which 

the logical unit is to be 
positioned 

Global file control blocks: There are eight global file 
control blocks (FOB, section 3.5.11) in the VORTEX system 
that are reserved for background use. System background 
and user programs can reference these global FCBs. The 
/PFILE directive stores key and name in the corresponding 
FCB before opening/rewinding the logical unit. To pass the 
buffer address and size of the record to the corresponding 
logical-unit FCB, make an RTE IOLINK service request 
(section 2.1. 13). The names of the global FCBs are SIFCB, 
PIFCB, PQFCB, SSFCB, BIFCB, BOFCB. GOFCB. and 
LOFCB, where the first two letters of the name indicate the 
logical unit. 



/PFILE,lun,key,name 



where 
lun 

key 
name 



is the number or name of the affected 
logical unit The logical unit must be one 
of the system defined logical units which 
has a global FCB 

is the protection code required to 
address lun 

is the name of the file to which the 
logical unit is to be positioned 



Global file control blocks: There are eight global tile 
control blocks (FCB, section 3.5.11) in the VORTEX system 
that are reserved for background use. System background 
and user programs can reference these global FCBs. The 
/PFILE directive stores key and name in the corresponding 
FCB before opening/rewinding the logical unit. To pass the 
buffer address and size of the record to the corresponding 
logical-unit FCB, make an RTE IOLINK service request 
(section 2.1.13). The names of the global FCBs are SIFCB, 
PIFCB. P0FL3. SSFCB. BIFCB. BOFCB, GOFCB, and 
LOFCB, where the first two letters of the name indicate the 
logical unit. 

Example: Position the PI logical unit to beginning of tile 
FILEXY, whose protection key is $ 

/PFILE, PI f $,FILEXY 



where 



tun 



is the number or name of the 
affected logical unit. The 
logical unit must be one of 
the system defined logical 
units which has a global FCB 



4.2.12 /FORM Directive 

This directive sets the specified line count on the LO logical 
unit This is the number of lines printed by DAS MR 



44 



JOB CONTROL PROCESSOR 



assembler or FORTRAN compiler before a top of form is 
issued. The directive has the general form 

/FORM.Unes 

where lines is the number (from 5 to 9999. inclusive) of 
lines to be printed before a top of form is issued 

The default value of lines is defined at system generation 
time. If the directive contains a value outside the legal 
range, the default value is used. 

Example: Set a line-count value of 100. 

/FORM, 100 



4.2.13 /KPMODE (Keypunch mode) 
Directive 

This directive specifies the mode, 026 or 029, (BCD or 
EBCDIC respectively) in which VORTEX is to read and 
punch cards. It has the general form 

KPMODE, m 

where m is for 026 mode, or 1 for 029 mode 

Example: Specify that cards be read and punched in 029 
keypunch mode. 

/KPMODE, 1 



4.2.14 /DASMR (DAS MR Assembler) 
Directive 



Parameter Presence 

I E Assembles V75 

I extended instru 

ctions. 



Flags implicit 
indirect instru 
uctions with 
"Ml error' 



Absence 

Rags V75 extended 
instructions with 
*OP error*. 

Assembles implicit 
indirect instructions 



The /DASMR directive can contain up to four such 
parameters in any order 

The DAS MR assembler reads source records from the PI 
logical unit on the first pass The Pi unit must have been 
set to the beginning of device before the 'DASMR directive 
This can be done with an 'ASSIGN (section 4.2.6), SF1LE 
(section 4 2 7), /REW (section 4.2.10). or /PFILE (section 
4.2.11) directive 

A load and go operation requires, in addition, an FXEC 
directive (section 4.2 22) 

Example: Schedule the DAS MR assembler with no source 
listing, but with binary object output on the GO file. 

/JOB, EXAMPLE 

/PFILE,BO, ,BO 
/DASMR, N,L 

JOB initializes the GO file to start of file. If BO is assigned 
to a rotating memory partition, a /PFILE, BO,, BO must pre- 
cede the /DASMR directive to initialize the file (unless the 
assembly is part of a stacked job - see section 4 3 for sample 
deck setup) 



This directive schedules the DAS MR assembler (section 
5 1) with the specified options tor background operation on 
priority level 1. It has the general form 

/DASMR,p(]),p(2).....p(n J ) 

where each p(n), if any, is a single character specifying one 
of the following options: 



Parameter 



Presence 

Suppresses binary 
ob|ect 

Outputs binary 
object on GO file 



Suppresses symbol 
table listing 

Suppresses source 
listing 



Absence 

Output binary object 



Suppresses output of 
binary object on GO 
file 

Output symbol-table 
listing 

Outputs source 
listing 



4.2.15 /FORT (FORTRAN Compiler) 
Directive 

This directive schedules the FORTRAN compiler (section 
5.3) with the specified options for background operation on 
priority level 1. It has the general form 

/FORT,p(Up(2), ,p(n) 

where each p(n), if any, is a single character specifying one 
of the following options 



Parameter 



Presence 

Suppresses binary 
object 

Assigns two words 
to integer array 
items and to inte 
ger and logical 
variables (ANSI 
standard) 



Absence 



Output binary object 



Assigns one word to 
integer array items 
and to integer and 
logical variables 
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Parameter 



M 



Presence 

Generate code 
using Floating 
Point Processor 
(FPP) 

Outputs binary 
object on GO file 



Suppresses symbol 
table listing 

Suppresses source 
listing 

Outputs object 
module listing 

Comptles condi 
tionally 

Generates code 
with calls to 
faster firmware 
routines (see 
section 20 2; 



Absence 

Generate no FPP 
instructions 



Suppresses output of 
binary object on GO 
file 

Outputs symbol table 
listing 

Outputs source 

listing 

Suppresses object 
module listing 

Compiles normally 



Generates subroutine 
calls 



where L is an optional parameter to request that all 
symbols in a source program be listed. Normally, CONC 
only lists those symbols which were referenced. 

The concordance program inputs from the SS logical unit 
and uses the same source statements that are input to the 
DAS MR assembler. It outputs to the LO logical unit a 
listing of all symbols and their referenced locations in the 
same input program 

The SS unit is set to the beginning of device before the 
CONC directive 

Example: Schedule the system concordance program. 

/ASSIGN, PI-MTOO 
/REW,PI 
/DASMR 

/PFILE,SS, , SS 
/CONC, L 



4.2.17 /SEDIT (Source Editor) 
Directive 

This directive schedules the symbolic source editor (section 
8) for background operation on priority level 1 It has the 
form 



The /FORT directive can contain 
ters in any order 



any or all such parame 



Sample deck formats are illustrated in section 4 3. 

The FORTRAN compiler reads source records from the PI 
logical unit. The PI unit must have been set to the 
beginning of device before the /FORT directive. This can be 
done with an /ASSIGN (section 4.2.6), /SPILE (section 
4.2.7), /REW (section 4.2.10), or /PFILE (section 4.2.11) 
directive. 

A load and go operation requires, in addition, an /EXEC 

directive (section 4.2.22) 

Example: Schedule the FORTRAN compiler with binary 
object, source, symbol table, and object module 
listings; normal compilation; and no binary-object output 
on the GO file. 

/FORT,0 



/SEDIT 
Example; Schedule the symbolic source editor 
/SEDIT 



4.2.18 /FMAIN (File Maintenance) 
Directive 



This directive schedules the file maintenance task (section 
9) for background operation on priority level 1 It has the 
form 



/FMAIN 
Example: Schedule the file maintenance task 
/FMAIN 



4.2.16 /CONC (System Concordance) 
Directive 

This directive schedules the system concordance program 
(section 5.2) for background operation. It has the form 

/CONC.L 



4.2.19 /LMGEN (Load-Module Generator) 
Directive 

This directive schedules the load module generator (section 
6) for background operation on priority level 1 A memory 
map is output unless suppressed The directive has the 
general form 
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/LMGEN.M 

where M, if present, suppresses the output of a memory 
map 

Example: Schedule the load module generator task with 
out a memory map. 

/LMGEN, M 



4.2.20 /IOUTIL (I/O Utility) Directive 

This directive schedules the I/O utility processor (section 
10) tor background operation on priority level 0. The 
directive has the form 

/IOUTIL 

Example: Schedule the I/O utility processor. 
/IOUTIL 



XXXXXX AAAAAA BBBBBB HHHHHH 

where XXXXXX is the starting memory address location of 
the eight following data words and AAAAAA through 
HHHHHH are the octal values of those locations The 
occurrence of an asterisk between two lines indicates that 
all dump lines between those lines have the same value as 
the previous line. 

/EXEC can be used to create a load module (named SW) 
on the SW logical unit and then schedule it, or to execute 
an existing load module on the SW logical unit. The action 
taken depends on the setting of bit 2 of the low core flag 
V$JCPF. If the bit is set, LMGEN is scheduled to read 
binary from the GO logical unit and catalog the task on SW 
If the bit ts not set, the current load module on SW is 
executed This bit is set by performing a "load and go" 
assembly or compulation using the "L" option flag This bit 
is cleared by the loading of any background program. 
(Note: JCP directives which do not load tasks, for 
example, /ASSIGN, /PFILE, do not clear this bit.). The load 
module on SW may be executed at anytime until SW ts 
modified (i.e., another load and go, LMGEN, COMSY, or any 
other task that writes to SW). 



4.2.21 /SMAIN (System Maintenance) 
Directive 

This directive schedules the system maintenance task 
(section 16) for background operation on priority level 1. 
The directive has the form 

/SMAIN 

Example: Schedule the system maintenance task 

/SMAIN 

4.2.22 /EXEC (Execute) Directive 

This directive schedules the load module loader to load and 
execute a load module from the $V& logical unit file. Add 
LMGEN and GO usage since this is not a VORTEX system 
task, execution is on priority level 0. The directive has the 
general form 



/EXECD 

Where D, if present, dumps all of the background upon 
completion of execution. The dump format consists of eight 
memory locations per line Both octal and ASCII represen 
tation appear in the dump During ASCII dump non-ASCII 
characters appear as blanks ASCII dump is suppressed if 
dump is to a TY or CT device. 

The dump format consists of eight memory locations per 
line as follows 



Example: Schedule the loading of a user load module 
from the SW unit file without a background dump 

/EXEC 

Schedule a FORTRAN load and go operation 

/FORT,L 
/EXEC 

When a dump has been specified the dump will be output 
to the List Output unit after the task exits or is aborted 
Once the dump has started, it may be terminated by use of 
the Operator Communication .ABORT When the dump is 
aborted in this manner, it ts required that the executing 
task be aborted by a previous action 

Example: 



/EXEC,D 

;ABORT,SW 

; ABORT, JP DUMP 

; ABORT ,SW 



Executes a load module 
from SW unit tile re 
questing background 
dump on exit 

Causes the task to abort 
and dump the background 

Causes the background 
dump to be aborted 

Causes the task to be 
released and JCP to be 
reloaded 
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4.2.23 /LOAD Directive 

This directive schedules a user task, which must be present 
in the background library or alternate library, for back 
ground execution on priority level 0. The directive has the 
general form 



/LOAD,name,p(I) t p(2), .p(3) 



where 



name 



is the name of the user task being 
scheduled 



each p(n) is a parameter required by the user 
(if any) task 



Example: Schedule the user task TSKONE from logical unit 
25. protection key N 

/ALTLIB,25,N 
/LOAD .TSKONE 



4.2.25 /DUMP Directive 

This directive causes all of background to be dumped upon 
completion of execution of a task executed from the 
background library or an alternate library. The dump 
format is the same as the format for /EXECD (see section 
4 222) 

Example: Schedule the execution of user task TSKONE with 
a dump at completion of execution 



Each parameter specified, if any, will be in the job-control 
buffer when the user task is scheduled The parameter 
string, which can extend to the end of the 80-character 
buffer, will appear in the buffer exactly as it does in the 
input directive. The address of the first word of the 
parameter string ts in location V$JCB 

Example: Schedule the user task TSKONE with parame 
ters ALPHA 1 and ALPHA2 

/LOAD, TSKONE, ALPHA 1 ,ALPHA2 



/DUMP 

/LOAD, TSKONE 



4.2.26 /CFILE Directive 

This directive, which applies only to RMDs and MTs 
assigned to global logical units, causes the designated file 
on the logical untt to be closed with update. It has the 
general form 

/CFILE, lun.key.name 



where 



4.2.24 /ALTLIB (Alternate 
Library) Directive 



directive replaces the background library with the 
tfied alternate library unit as the unit from which a 

lOmtinri tack IC tn h<» l/VaHorl Tho Hireu-ima k« H,„ 



Thus 

specmtfu auemaie HDrary unn as me unit Tn 
background task is to be loaded The direct 
general form: 

/ALTUB.Iun.key 

where 



ive has the 



fun 



key 



is the number or name of the 
alternate library logical unit 

is the protection code required 
to address lun 



This directive affects the ioading of the next task which 
would normally be loaded from the background library It 
affects the loading of VORTEX language processors and 
utility tasks in addition to user tasks loaded with the • LOAD 
directive. 

It has no effect on a /EXEC directive After execution of the 
background task, the background library is restored as the 
logical unit from which background tasks are to be loaded. 



lun 



key 



name 



is the name or number of the affected 
logical unil. The logical unit must be 
one of the global logical units 

is the protection code required to 
address lun 

is the name of the file on lun to 
be closed with update 



Example: Close the file FILEA on logical unit PO with no 
protection code. 

/CFILE,PO, f FllEA 



4.2.27 /DBGEN (Data Base Generator) Directive 

This directive schedules the Data Set Generator Program 
(see TOTAL Manual for more detailed information) for 
background operation on priority level 1. It has the form 

/DBGEN 

Example: Schedule the Data Base Generator for TOTAL 
/DBGEN 
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4.2.28 /PLOAD Directive 

This directive schedules a user task, which must be present 
in the background library or alternate library, tor back 
ground execution on priority level 1. The directive has the 
general form 



/PLOAD,xxxxxx,p(J ),p(2), p(n) 



where 



P(n) 



is the name of the user task being 
scheduled. The name must not con 
tain numeric characters. 

is a parameter required by the user 
task. 



Each parameter specified, if any, will be in the job-control 
buffer when the user task is scheduled. The parameter 
string, which can be extended to the end of the 80 
character buffer, will appear in the buffer exactly as it does 
in the input directive. The address of the first word of the 
parameter string is in location V$JCB. 



Parameter 


Presence 


Absence 


B 


Suppresses binary 
object. 


Output binary object. 





Include RPG debug 
features in object 
module. 


Suppress debug features 


L 


Outputs binary 
object on GO file. 


Suppresses output of 
binary object on GO file. 


M 


Suppresses symbol 
table listing. 


Outputs symbol table 
listing. 


N 


Suppresses source 
listing. 


Outputs source listing. 



The /RPG directive can contain up to five such parameters 
in any order. 

Sample deck formats are illustrated in section 4 3 

The RPG II compiler reads source records from the PI 
logical unit. The PI unit must have been set to the 
beginning of device before the /RPG directive. This can be 
done with an /ASSIGN (section 4.2.6), /SFILE (section 
4.2.7), /REW (section 4.2.10), or /PFILE (section 4.2.11) 
directive. 



4.2.29 /FMUTIL Directive 

This directive causes files, directories, and/or partitions to 
be dumped or loaded from RMD's or magnetic tapes, and 
schedules the file maintenance utility (section 21) for 
background operation on priority level 1. The directive has 
the form 

/FMUTIL 



Example: Schedule the RPG II compiler with binary object, 
source, and symbol table listings; normal compilation; and 
no binary object output on the GO file. 

/RPG 

Example: Schedule RPG II for normal compilation but with 
binary object output on the GO file instead of the BO file. 

/RPG.L.B 



Examples: Schedule File Maintenance Utility 
/FMUTIL 



4.2.30 /RPG (RPG II Compiler) Directive 



4.2.31 /P (Pause) Directive 

This directive outputs the specified comment to the SO and 
LO logical units and then causes JCP to be suspended. In 
addition to the specified comment, instructions are output 
to SO on how to resume JCP It has the general form 



This directive schedules the RPG II compiler (section 5 5) 
with the specified options for background operations on 
priority level 1. It has the genera! form 

/RPG.pCi ),p(2),. ,p(n) 



where 



/P.comment 



comment is any desired free form 
comment 



where 



p(n) is a single character specifying one 

of the following options: 



Example: Request that the current job requires MT ~ 800 
on MT00 before it continues 

/P, Mount MT #800 on MT00 
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in addition, JCP will output: 
Pause WHEN READY, TYPE --y RESUME, JCP 



position the PI logical unit to the third file. Allocate four 
additional 512 word blocks for the DAS MR symbol-table 
area 



4.3 SAMPLE DECK SETUPS 

The batch processing facilities of VORTEX are invoked by 
JCP control directives in combination with programs and 
data. These elements form the input job stream to 
VORTEX. The input job stream can come from various 
peripherals and be carried on various media These 
examples illustrate common job streams and deck prepara 
Iron techniques. 

Example 1 - Card Input: Compile a FORTRAN IV main 
program (with source listing and octal object listing), and 
assemble a DAS MR subprogram Then load and execute 
the linked program 

/JOB, EXAMPLE 1 
/FORT,L,0 



(Source Deck) 
/DASMR,L 
(Source Deck) 



/EXEC 
/ENDJOB 

Example 2 - Card Input: Assemble a DAS MR program 
(with source listing and load and execute) and generate a 
concordance listing. The DAS MR program is cataloged on 
RMD partition DOOK under file name USER1 with protec 
tion key U Assign the PI logical unit to RMD partition 
DOOK, open file name USER1 for the assembler, assemble 
the program, and execute the program with a dump. 

/JOB,EXAMPLE2 
/ASSIGN, PI-DOOK 
/PFILE.PI ,U,USER1 
/DASMR, L 
/PFILE.SS, , SS 
/CONC 
/EXEC,D 
/ENDJOB 



Example 3 • Card Input: Assemble a DAS MR program 
(with source listing and object module output on the BO 
logical unit) Assign the PI logical unit to magnetic tape 
unit MTOO, the PO logical unit to dummy device, the SS 
logical unit to the PI logical unit, the BO logical unit to 
RMD partition DOOJ, and output the object module to file 
name USER2 with no protection key. Before assembly, 



/JOB, EXAMPLES 

/ASSIGN,PI-MT0 0,PO«DUM, SS-PI , BO*D00 J 

/REW,PI 

/SFILE,PI , 2 

/PFILE,BO, ,USER2 

/MEM, a 

/DASMR 

/ENDJOB 



Example 4 • Card Input: After generation of a VORTEX 
system, use FMAIN to initialize and add object modules to 
the object module library (OM) with protection key D. 
Assign the Bl logical unit to CROO. 

/JOB,EXAMPLEU 
/ASSIGN, BI-CROO 
/FMAIN 
INIT,OM,D 
INPUT, BI 
ADD.OM.D 



(Object Modules) 
(2 789 EOF Card) 

/ENDJOB 

Example 5 • Card Input: Load and go operation. Compile a 
FORTRAN IV main program, a subprogram and assemble a 
DASMR subprogram. Save output on BO. Execute the 
linked programs 

/JOB, EXAMPLES 
/PFILE,BO, ,BO 
/FORT,L 



(Source deck FORTRAN main program) 
(Source deck FORTRAN subprogram) 
/DASMR, L 

(Source deck DASMR subprogram) 



/EXEC 
/FINI 
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SECTION 5 

LANGUAGE PROCESSORS 



The VORTEX operating system supports three language 
processors: the DAS MR assembler (section 5.1), the 
FORTRAN IV compiler (section 5.3). and the RPG IV 
compiler (section 5.4), plus the ancillary concordance 
program (section 5.2.). 



5.1 DAS MR Assembler 

DAS MR is a two-pass assembler scheduled by job-control 
directive /DASMR (section 4.2.14). DAS MR uses the 
secondary storage device unit for pass 1 output. It reads a 
source module from the PI logical unit and outputs it on 
the PO unit. The source input for pass 2 is entered from 
the SS logical unit. 

When an END statement is encountered, the SS unit is 
repositioned and reread During pass 2. the output can be 
directed to the BO and/or GO units for the object module 
and the LO unit for the assembly listing The SS or PO file, 
which contains a copy of the source module, can be used as 
input to a subsequent assembly. 

A DAS MR symbol consists ot one to six characters, the 
first of which must be alphabetic, with the rest alphabetic 
or numeric Additional alphanumeric characters can be 
appended to the first six characters of the symbol to form 
an extended symbol up to the limit imposed by a single line 
of code. However, only the first six characters are 
recognized by the assembler 

DAS MR symbols may also be formed from the pound sign, 
exclamation mark or dollar sign, in initial and other 
positions 

Since the DAS MR assembler is used within the VORTEX 
system under VORTEX I/O control, the VORTEX user can 
specify the desired I/O devices. However, the PO and SS 
logical units must be the same magnetic tape unit or RMD 
partition. Except when Pt is equal to SS as shown in section 
4.3 (example 3). 

UAS MR has a symbol table area for 175 symbols at five 
words per symbol. To increase this area input before the 
/DASMR directive a /MEM directive (section 4.2.5), where 
each 512 word block enlarges the capacity of the table by 
100 symbols 

A VORTEX physical record on an RMD is 120 words. Source 
records are blocked three 40 word records per VORTEX 
physical record, and object modules are blocked two 60 
word modules per record. However, in the case where SI * 
PI - RMD, records are not blocked but assumed to be one 
per VORTEX physical record. When an input file contains 
more than one source module each new source module 
must start at a physical record boundary Unused portions 
of the last physical record of the previous source modules 
should be padded with blank records. Proper blocking may 



be ensured by following the END statement of the previous 
source module with two blank records. 

Detailed references to the DAS MR assembly language are 
given in the appropriate Varian reference manuals (see 
section 1.3). These references include descriptions of the 
directives recognized by the assembler (table 5 1), except 
for the title directive which is discussed below. DAS MR will 
assemble the entire V75 extended instruction set if the E 
parameter is specified in the /DASMR directive. 

Table 5-1. Directives Recognized by the DAS MR 
Assembler 



BES 


IFF 


BSS 


IFT 


CALL 


LIST 


COMN 


LOC 


CONT 


MAC 


DATA 


MZE 


DETL 


NAME 


DUP 


NLIS 


EJEC 


NULL 


END 


OPSY 


EMAC 


ORG 


ENTR 


PZE 


EQU 


RETU 


EXT 


SET 


FORM 


SPAC 


GOTO 


SMRY 




TITLE 



Error messages applicable to the DAS MR assembler are 
given in Appendix A. 5.1. 

5.1.1 TITLE Directive 

This directive changes the title of the assembly listing and 
the identification of the object program It ha^ the genera! 
form 

TITLE symbol 

where symbol is the new title ot the assembly listing the 
label field being ignored by the assembler There are a 
maximum of eight characters in symbol. 

At the beginning of assembler pass 1 the tttte of the 
assembly listing and the identification of the object 
program are initialized as blanks When a TITLE directive 
is encountered, title and identification assume the symbol 
given in the directive 

Examples: Entitle the assembly listing and object pro 
gram NEWTITLE 



TITLE 



NEWTITLE 



Reinitialize the title and identification, obliterating the old 
title 

TITLE 
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5.1.2 VORTEX Macros 



The DAS MR assembler contains macro definitions for the 
realtime executive (RTE, section 2.1) and I/O control (IQQ, 
section 3.5) macros. Figure 5 1 illustrates these definitions 



M1 



* 
READ 



MAC 

EXT 

JSR 

DATA 

FORM 

F 

DATA 

EMAC 



V$IOC 
040**, 1 
0100000 

1.3, a, 8 

P( 1 ) ,P(2) ,P( 3),P(t|) 
P(5) ,0,0 



VORTEX READ MACRO DEFINITION 



READ 



MAC 

M1 
EMAC 



DCB,LUN,W,M 

WHERE DCB - FCB OR DCB ADDRESS 
LUN - LOGICAL UNIT NO. 
W m WAIT OPTION 
M « I/O MODE 

P( 3) ,PU) ,0,P(2) ,P( 1 ) 



+ 
* 
WRITE 



* 

* 
* 

WEOF 



* 
* 
* 
* 
* 
* 
REM 



VORTEX WRITE MACRO DEFINITION 
WRITE DCB,LUN,W,M 

WHERE DCB - FCB OR DCB ADDRESS 
LUN - LOGICAL UNIT NO. 
W - WAIT OPTION 
M - I/O MODE 



MAC 
Ml 

EMAC 



P<3) ,P(<1) ,{ # P(2) ,P( 1) 



VORTEX WRITE END OF FILE MACRO DEFINITION 
WEOF DCB, LUN, W 

WHERE DCB - FCB OR DCB ADDRESS 
LUN - LOGICAL UNIT NO.^S 
W • WAIT OPT^ON r 



MAC 
M1 

EMAC 



P(3),0,2,P<2) ,P< 1) 



VORTEX REWIND MACRO DEFINITION 
REW DCB, LUN, W 

WHERE DCB * FCB OR DCB ADDRESS 
LUN - LOGICAL UNIT NO. 
W - WAIT OPTION 
MAC 

*1 P<3),0,3,P<2),*(1> 

EMAC 

VORTEX SKIP RECORD MACRO DEFINITION 
SREC DCB,LUN,W,M 

WHERE DCB - FCB OR DCB ADDRESS 
LUN - LOGICAL UNIT NO. 
W - WAIT OPTION 
M • I/O MODE 
Figure 5 1. VORTEX Macro Definitions for DAS MR 
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SREC 


MAC 




M1 


^ 


BMAC 


* 


VORTEX 


* 


FUNC 



FUNC 



* 
* 
* 
* 

* 
OPEN 



CLOSE 



P(3),PU),4,P(2) f P( 1) 



FUNCTION MACRO DEFINITION 
DCB, LUN, W 

WHERE DCB * FCB OR DCB ADDRESS 
LUN - LOGICAL UNIT NO. 
W - WAIT OPTION 



MAC 

M1 
EMAC 

VORTEX 
OPEN 



MAC 

M1 

EMAC 

VORTEX 
CLOSE 



MAC 

M1 
EMAC 

VORTEX 
STAT 



P(3) ,0,5,P(2) ,P( 1 ) 



OPEN MACRO DEFINITION 
FCB,LUN,W,M 

WHERE FCB - FCB OR DCB ADDRESS 
LUN - LOGICAL UNIT NO . 
W - WAIT OPTION 
M - I/O MODE 



STAT 


MAC 




EXT 




JSR 




DATA 




EMAC 


* 




* 


VORTEX 


* 


DCB 


* 




4> 




* 




DCB 


MAC 




DATA 




EMAC 



P(3) ,PU) ,6,P(2) ,P( 1 ) 



CLOSE MACRO DEFINITION 
FCB,LUN,W,M 

WHERE FCB - FCB OR DCB ADDRESS 
LUN - LOGICAL UNIT NO. 
W - WAIT OPTION 
M - I/O MODE 

P(3) ,PU) ,7,P(2) ,P< 1 ) 



STATUS MACRO DEFINITION 
FCB , ERR , EOF , EOD , BUSY 

WHERE FCB - FCB OR DCB ADDRESS 

ERR - ERROR RETURN ADDRESS 
EOF - END OF FILE, BEGINNING 

OF DEVICE, OR BEGINNING OF 
TAPE RETURN ADDRESS 
EOD - END OF DEVICE OR END OF TAPE 
RETURN ADDRESS 
BUSY - BUSY RETURN ADDRESS 



V$IOST 
0373, 1 
P( 1) ,P(2) ,P(3) ,PU) ,P(5) 



DEVICE CONTROL BLOCK MACRO DEFINITION 
RL,BUF,CNT 

WHERE RL - RECORD LENGTH 
BUF - DATA ADDRESS 
CNT « COUNT 



P( 1 ) ,P(2) ,P< 3) 



Figure 5-1. VORTEX Macro Definitions for DAS MR (continued) 
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VORTEX 
FCB 



CB 



M2 



* 

* 
SCHBD 



* 
* 

EXIT 



SUSPND 



MAC 

DATA 

FORM 

F 

DATA 

BMAC 

MAC 
EXT 
JSR 
EMAC 

VORTEX 
SCHED 



MAC 
M2 

FORM 

F 

FORM 

F 

DATA 

EMAC 

VORTEX 
EXIT 

MAC 
M2 

DATA 
BMAC 

VORTEX 
SUSPND 

MAC 
M2 

FORM 

F 

EMAC 



FILE CONTROL BLOCK MACRO DEFINITION 
RL , BUF , AC , KEY , * N 1' , * N2 ' , * N3 * 
WHERE RL - RECORD LENGTH 
BUF - DATA ADDRESS 
AC - ACCESS METHOD 
KEY - PROTECTION KEY 
N1 - FIRST 2 ASCII FILE NAME 
N2 - SECOND 2 ASCII FILE NAME 
N3 - THIRD 2 ASCII FILE NAME 

P( 1>,P<2) 
6,2,8 

0,P(3) ,PU) 
0,0,0,0,P(5> ,P(6),P<7) 



VIBXEC 
0106, 1 



SCHEDULE MACRO DEFINITION 

PL f W,LUN,KEY, *N1 ' , ' N2 * , * N3 ' 

WHERE PL - PRIORITY LEVEL 
W - WAIT OPTION 
LUN - LOGICAL UNIT NO. 
KEY « PROTECTION KEY 
N1 - FIRST 2 ASCII TASK NAME 
N2 - SECOND 2 ASCII TASK NAME 
N3 - THIRD 2 ASCII TASK NAME 



3,1,6,1,5 

0,P<2) , 1,0, P< 1) 

8,8 

P(4) ,P<3) 

P(5) ,P(6> ,P(7) 



EXIT MACRO DEFINITION 



0200 



SUSPEND 
T 



MACRO DEFINITION 



WHERE T - TYPE OF SUSPENSION 



4,6,5 
0,3,0 



1 
P( 1) 



VORTEX RESUME MACRO DEFINITION 
RESUME 'N1 ' , 'N2' , 'N3' 

WHERE N1 - FIRST 2 ASCII TASK NAME 
N2 - SECOND 2 ASCII TASK NAME 
N3 - THIRD 2 ASCII TASK NAME 
Figure 5-1. VORTEX Macro Definitions for DAS MR (continued) 
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RESUME 



ABORT 



ALOC 



MAC 
M2 

DATA 
EMAC 

VORTEX 
ABORT 



MAC 
M2 

DATA 
EMAC 

VORTEX 
ALOC 



MAC 
M2 

DATA 
EMAC 

VORTEX 
DEALOC 



0400, P( 1 ) ,P(2) ,P( 3) 



ABORT MACRO DEFINITION 
*N1 ' , 'N2' , 'N3 ' 

WHERE N1 - FIRST 2 ASCII TASK NAME 
N2 - SECOND 2 ASCII TASK NAME 
N3 - THIRD 2 ASCII TASK NAME 



0500,P< 1) ,P<2) ,P(3) 



ALLOCATE MACRO DEFINITION 
ADDR 

WHERE ADDR - ADDRESS OF REENTRANT 
SUBROUTINE 



0600, P( 1 ) 



DEALLOCATE MACRO DEFINITION 



DEALOC 



MAC 
M2 

DATA 
EMAC 

VORTEX 
PMSK 



0700 



PRIORITY INTERRUPT MASK MACRO DEFINITION 
NUM,MSK,TYP 

WHERE NUM - PIM NUMBER 

MSK - PIM LINE MASK 

TYP - ENABLE OR DISABLE TYPE 



PMSK 


MAC 
M2 




F1 


FORM 


4,6,5,1 




F1 


0,010, 0,P(3) 


F 


FORM 


8,8 




F 


P( 1 ) ,P(2) 




EMAC 





DELAY 
F 



VORTEX DELAY MACRO DEFINITION 
DELAY T5,TM,DT 

WHERE T5 - DELAY TIME IN 5 MILLI- 
SECOND INCREMENTS 
TM - DELAY TIME IN 1 MINUTE 

INCREMENTS 
DT - DELAY TYPE 



MAC 

M2 

FORM 

F 

DATA 

EMAC 



1,6,(1,2 
0,01 1 ,0,P( J) 
P( 1 ) ,P(2 ) 



Figure 51. VORTEX Macro Definitions for DAS MR (oin^nuedj 
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DELAY 



* 
* 
* 
* 
TIME 



VORTEX LDELAY MACRO DEFINITION 



LDELAY 



MAC 
M2 

DATA 
FORM 
F 
EMAC 



T5, TM, LUN, KEY 

WHERE T5 - DELAY TIME IN 5-MILLISECOND 
INCREMENTS 
TM - DELAY TIME IN 1 -MINUTE 
INCREMENTS 
LUN - LOGICAL UNIT NUMBER FOR TASX LOAD 
KEY « PROTECTION KEY 



01107, P( 1),P<2) 

8,8 

PU) ,P(3) 



VORTEX TIME REQUEST MACRO DEFINITION 
TIME 



MAC 
M2 

DATA 
EMAC 



01200 



VORTEX OVERLAY MACRO DEFINITION 

OVLAY TF, 'NT , 'N2' , ' N3 ' 

WHERE TF * TYPE FLAG 

N1 - FIRST 2 ASCII TASK NAME 
N2 » SECOND 2 ASCII TASK NAME 
N3 «■ THIRD 2 ASCII TASK NAME 



OVLAY 


MAC 
M2 




F 


FORM 


4,6,5,1 




F 


0,013, 0,P( 1) 




DATA 


P(2),P(3) ,P(q) 




EMAC 






VORTEX 


IOLINK MACRO DEFI 




IOLINK 


LUN f BUF,NUM 

WHERE LUN 
BUF 

NUM 


IOLINK 


MAC 
M2 




F 


FORM 


4,6,6 




F 


0,01«,P(1) 




DATA 


P(2),P(3) 




EMAC 





LOGICAL UNIT NO. 
USER'S BUFFER LOCATION 
BUFFER SIZE 



VORTEX PASS MACRO DEFINITION 

PASS COUNT, FROM, TO 

WHERE COUNT - WORD COUNT 

FROM - FROM ADDRESS 
TO - TO ADDRESS 



Figure 5-1. VORTEX Macro Definitions for DAS MR (continued) 
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PASS 



MAC 
M2 

PROM 

r 

DATA 
BMAC 



4,6,6 
0,016,0 
P(1),P(2) ,P<3> 



VORTEX TBBVNT MACRO DEFINITION 
fTBBVNTJ VALUE, % DISP, ^C/S 



WHERE 



VALUE - IS A BIT MASK 

DISP - IS THE TIDB WORD TO BE ALTERED. 

IT IS EXPRESSED BY WAY OF A NUMBER, 
THE DISPLACEMENT (OR POSITION) OF THIS 
WORD IN THE TIDB. 

C/S • IS THE CLEAR/SET INDICATION (0 - CLEAR 
1 - SET) 



OPTIONS 



BOTH DISP AND C/S ARE OPTIONAL AND 
THE DEFAULT FOR BOTH IS 0. 



IMPLEMENTATION 



WHEN DISP - THE ACTION DEPENDS ON 
THE VALUE OF VALUE: 



VALUE, IF 0-177776, IS SET INTO 
THE REQUESTING TASK'S TIDB TBEVNT 
WORD. IF VALUE IS 0177777, RETURN 
IS WITH THE REQUESTOR'S TBEVNT IN 
THE A REGISTER 



WHEN DISP - 0, DISP WILL BE ALTERED 
ACCORDING TO VALUE AND C/S . 

C/S * 0, ALL THE BITS IN DISP CORRESPONDING 
TO THE ZERO (0) BITS IN VALUE 
WILL BE RESET TO 0. 



TBEVNT 



MAC 

M2 

DATA 

DATA 

BMAC 



C/S - 1, ALL THE BITS IN DISP CORRESPONDING 
TO THE ONE ( 1 ) BITS IN VALUE 
WILL BE SET TO 1 . 



°* 



01700 

P( 1) ,P(2),P(3) 



Figure 5-1. VORTEX Macro Definitions for DAS MR (continued) 
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VORTEX ALLOCATE PAGE MACRO DEFINITION 
ALOCPG N.LOGICA ADDR , REJECT ADDR 



WHERE N 
LOGICAL ADDR 



REJECT ADDR 



- NUMBER OP PAGES TO ALLOCATE 

- LOGICAL ADDRESS 
MODULO 01000, WHERE 
PAGES ARE ALLOCATED 

• ERROR RETURN ADDRESS 



ALOCPG 



MAC 
M2 

DATA 
DATA 
DATA 
DATA 
EMAC 



02000 
P( 1) 
P<2) 
P(3) 



VORTEX DEALLOCATE PAGE MACRO DEFINITION 
DEALPG N, LOGICAL ADDR, REJECT ADDR 



WHERE N 
LOGICAL ADDR 



REJECT ADDR 



NUMBER OF PAGES TO DEALLOCATE 

LOGICAL ADDRESS, 

MODULO 01000, WHERE 

PAGES ARE TO BE 

DEALLOCATED 

ERROR RETURN ADDRESS 



DEALPG 



MAC 
M2 

DATA 
DATA 
DATA 
DATA 
EMAC 

VORTEX 
MAPIN 



02100 
PC 1 ) 
P(2) 
P(3) 



MAPIN MACRO DEFINITION 

N,LOBICAL ADDR, BUFFER ADDR , REJECT ADDR 



WHERE N 
LOGICAL ADDR 



BUFFER ADDR 



REJECT ADDR 



NUMBER OF PAGES TO BE MAPPD 
LOGICAL ADDRESS, MODULO 
01000, WHERE PAGES ARE TO 
BE ALLOCATED 
PHYSICAL PAGE NUMBER 
OR BUFFER ADDRESS CON- 
TAINING PHYSICAL PAGES 
TO BE MAPPED 
ERROR RETURN ADDRESS 



MAPIN 



MAC 
M2 

DATA 
DATA 
DATA 
DATA 
DATA 
EMAC 



02200 
P< 1) 
P(2) 
P<3) 
P(<!) 



Figure 5 1. VORTEX Macro Definitions for DAS MR (continued) 
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VORTEX PAGE NUMBER MACRO DEFINITION 

PAGNUM LOGICAL ADDR 

WHERE LOGICAL ADDR * ADDRESS WITHIN THE 

REQUESTING TASK'S VIRTUAL 
MEMORY WHERE IDENTIFICATION 
OF THE ASSIGNED PHYSICAL 
PAGE IS REQUIRED 



PAGNUM MAC 
M2 

DATA 02300 

DATA P t 1 ) 

EMAC 



Figure 5-1. VORTEX Macro Definitions for DAS MR (continued) 
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5.1.3 Assembly Listing Format 

Figure 5-2 is a sample listing following the format described 
in this section. 

Page format: The assembly listing is limited to the 
number of lines per page specified by the VORTEX resident 



constant V$PLCT, with each line containing no more than 
120 characters. Each page has a page number and title 
line followed by one blank line, and then the program 
listing containing two lines less than the number specified 
by V$PLCT. (This specification can be changed through the 
job control processor (JCP).) 



PAGE 23 01/22/72 PROG 1 



000660 074056 A 

000661 064056 A 

000662 010412 A 

000663 005311 A 

000664 054003 A 



000665 
000666 
000667 
000670 
000671 
000672 
000673 
000674 
000675 
000676 
000677 
000700 
000701 
000702 
000703 
000704 

000705 
000706 
000707 
000710 
00071 1 
0007 12 
000713 
000714 
000715 
000716 
000717 
000720 
000721 
000722 
000723 



006505 
000604 
001405 
000665 
000051 
030400 
015003 
150463 
054274 
015002 
150463 
144271 
001010 
000714 
017000 
054004 

006505 
000630 
100000 
010403 
000633 
000000 
000000 
030400 
015005 
150463 
144252 
001010 
000733 
017000 
054004 



588 
589 
590 
591 
592 
593 
594 
595 
596 
597 



598 
599 
600 
601 
602 
603 
604 
605 

606 
607 
608 



609 
610 
611 
612 
613 

614 
615 

616 



JCPPT 



VORTEX DASMR V$JCP 

EJEC 

SUBROUTINE PRINTS JCP DIRECTIVE ON SO AND LO DEVICE 



STX 
STB 
LDA 
DAR 
STA 
IOLINK 



JCPR1 



JSPRX 
JCPRB 
VSJCB 

* + 4 



GET BUFFER ADDRESS 
SETUP LOFCB 



LDX 


VJLUT1 


LDA 


SO.X 


ANA 


BM377 


STA 


JCTA 


LDA 


SI,X 


ANA 


BM377 


SUB 


JCTA 


JAZ 


JCPR1 


LDA 


JCFBCS+3 


STA 


* + 5 


WRITE 


LOFCB, SO, 0, 1 



ADRS OF LOG UNIT TBL 
SO CUR ASSIGNMT 



SO CUR ASSIGNHT 
SO, SI SAME LUN 



STORE 'LOFCB' ADRS IN CALL 
NO - WRITE TO SO 



LDX 


VSLUT1 


LDA 


LO,X 


ANA 


BM377 


SUB 


JCTA 


JA£ 


JCPRE 


LDA 


JCFCBS+3 


STA 


* + 5 


WRITE 


LOFCB, LO, 0, 1 



LO CUR ASSIGNMT 
LO, SO SAME LUN 
YES 

STORE 'LOFCB' ADRS IN CALL 

NO - WRITE TO LO 



Figure 5-2. Sample Assembly Listing 
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At the end of the assembly, the following information is 
printed after the END statement: 

a. A line containing the subheading ENTRY NAMES 

b. All entry names (in four columns), each preceded by its 
value and a flag to denote whether the symbol is 
absolute (A), relocatable (R), or common (C). 

c. A line containing the subheading EXTERNAL NAMES 

d. All external names (in four columns), each preceded by 
its value and a flag to denote that the symbol is external 

(E) 

e A line containing the subheading SYMBOL TABLE 

f. The symbol table (tn four columns), each symbol 
preceded by its value and a flag to denote whether the 
symbol is absolute (A), relocatable (R), common (C), 
or external (E) 

g. A line containing the subheading mmmm ERRORS 
ASSEMBLY COMPLETE, where mmmm is the 
accumulated error count expressed as a decimal 
integer, right justified and left-blank fitted 

Line format: Beginning with the first character position, 
the format for a title line is: 

a. One blank 

b. The word PAGE 

c. One blank 

d. Four character positions that contain the decimal page 
number 

e. Two blanks 

f. Eight character positions that contain the current date 
obtained from the VORTEX resident constant V$DATE 

g. Two blanks 

h. Eight character positions that contain the program 
identification obtained from the VORTEX resident 
constant V$JNAM 

i. Two blanks 

j. The word VORTEX 

k. Two blanks 

I. The word DASMR 

m. Two blanks 

n. Eight character positions that contain the program title 
from the TITLE directive 

o. Blanks through the 120th character position 



Beginning with the first character position, the format for 
an assembly line is: 

a. One blank 

b. Six character positions to display the location counter 
(octal) of the generated data word 

c. One blank 

d. Six character positions to display the generated data 
word (octal) 

e. One blank 

f. One character position to denote the type of generated 
data word: absolute (A), relocatable (R), common (C), 
external (E), literal (L), or indirect address pointer 
generated by the assembler (I) 

g. One blank 

h. Four character positions containing the decimal 
symbolic source statement line number, right-justified 
and left-blank fitted 

i. One blank 

j. Eighty character positions that contain the image of the 
symbolic source statement. (If the symbotic source 
statement is not a comment statement, the label, 
operation, and variable fields are reformatted into 
symbiotic source statement character positions 1, 8, 
and 16, respectively. If commas separate the label, 
operation, and variable fields, they are replaced by 
blank characters.) 

k. Blanks, if necessary, through the 120th character 
position 

Error Chaining: If syntax errors occur during an assembly 
error, chaining is provided to assist in finding the errors. If 
errors occur, the error message at the end of the assembly 
contains a decimal value within parentheses corresponding 
to the source line number at which the last error occurred. 
The line number referenced in turn references the next line 
number containing an error. The last line number 
containing an error does not have a chaining reference. If 
no errors occurred, the error message does not contain a 
chaining reference. 

5.2 CONCORDANCE PROGRAM 

The background concordance program (CONC) provides an 
indexed listing of all source statement symbols, giving the 
number of the statement associated with each symbol and 
the numbers of all statements containing a reference to the 
symbol. CONC is scheduled by job-controf directive /CONC 
(section 4.2.16). Upon completion of the concordance 
listing, control returns to the JCP via EXIT. 

Input to CONC is through the SS logical unit The 
concordance is output on the LO unit. CONC uses system 
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global file control block SSFCB. tf the SS logical unit is an 
RMD, a /REW or /PFILE directive (section 10) establishes 
the FCB before the /CONC directive is input to the JCP. 

CONC has a symbol-table area to process 400 no reference 
symbols at five words per symbol, plus 400 referenced 
symbols (averaging five references per symbol) at ten 
words per symbol. To increase this area, input before the 
/CONC directive a /MEM directive (section 4.2.5), where 
each 512 word block enlarges the capacity of the table by 
approximately 75 symbols 

CONC processes both packed records (three source 
statements per 120-word VORTEX physical record) and 
unpacked records (one source statement per record). 



5.2.1 Input 

CONC receives source statment input from the SS logical 
unit. There is, however, no positioning of the SS unit prior 
to reading the first record. The source statements are 
identical with those input to the VORTEX assembler and 
thus conform to the assembler syntax rules. 

As the inputs are read, each source statement is assigned 
a line number, 1, 2, etc., which is identtcal with that 
printed on the assembly listing. When a symbol appears in 
the label field of a symbolic source statement, the line 
number of that source statement is assigned to the symbol. 
When the symbol appears in the variable field of a source 
statement, the line number of that statement is used as a 
reference for the symbol. 



5.2.2 Output 

CONC outputs the concordance listing on the LO logical 
unit. Output begins when one of the following events 
occurs: 

a CONC processes the source statement END 

b. Another job-control directive is input 

c An SS end of file or end of device is found 

d A reading error is found 

e The symbol-table area is filled 

If the output occurred because the symbol-table area of 
memory was full, CONC clears the concordance tables, 
outputs error message CN01, and continues until one of 
the other terminating conditions is encountered. In all 
other cases, CONC terminates by calling EXIT. 

The concordance listing is made in the order of the ASCII 
values of the characters comprising the symbols. 

Beginning with the first character position, the format for a 
title line is: 



a. One blank 

b The word PAGE 

c. One blank 

d. Four character positions that contain the decimal page 
number 

e. Two blanks 

f. Eight character positions that contain the date 
obtained from the VORTEX resident constant V$DATE 

g. Two blanks 

h. Eight character positions that contain the program 
identification obtained from the VORTEX resident 
constant V$JNAM 

i. Two blanks 

j The word VORTEX 

k. Two blanks 

I. The word CONC 

m. Blanks through the 72nd character position 

Beginning with the first character position, the format for a 
concordance cross reference listing is: 

a. Two blanks 

b. Four character positions that contain the decimal Itne 
number of the source statement assigned to the symbol 
in item (e) below 

c. One blank 

d. One character position containing an asterisk (*) if 
there are no references to that symbol (otherwise 
blank) 

e. Six character positions containing the symbol being 
listed 

f. Two blanks 

g Four character positions that contain the decimal line 
number of a source statement referencing the symbol 
in item (e) above 

h. Items (f) and (g) are repeated as necessary for each 
source statement referencing the symbol in item (e) 
above, where up to nine references are placed on the 
first line, and subsequent references on the next 
line(s). Continuation lines that may be required for 
ten or more references to the same symbol do not 
repeat items (a) through (e) 

i. Blanks through the 72nd character position of the last 
line of the entry 

Figure 5 3 illustrates the concordance listing 
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AGE 


1 09/22/71 


V$OPCM VORTEX 


509 


B 


841 


859 


879 


990 






1074 


1112 


1230 


1231 


261 


BIO 


* 








262 


B11 


* 








263 


B12 


* 








1206 


ODATE 


1180 


1182 


1190 




1937 


ONUM 


895 
1406 


928 
1418 


936 


1017 



1001 1Q02 1012 1068 1072 



1182 1190 1196 1254 1284 



Figure 5-3. Sample Concordance Listing 



5.3 FORTRAN IV COMPILER 



The FORTRAN IV compiler is a one pass compiler sched 
uled by job-control directive /FORT (section 4.2.15). The 
compiler inputs a source module from the PI logical unit 
and produces an object module on the BO and /or GO units 
and a source listing on the LO unit. No secondary storage 
is required for a compilation. 

If a fatal error is detected, the compiler automatically 
terminates output to the BO and GO units. LO unit output 
continues. The compiler reads from the PI unit until an 
END statement is encountered or a control directive is 
read. Compilation also terminates on detection of an I/O 
error or an end-of -device, begin ningof -device, or end-of file 
indication from I/O control. 

The output comprises relocatable object modules under all 
circumstances: main programs and subroutines, func- 
tion, and block-data subprograms. 

Error messages applicable to the FORTRAN IV compiler are 
given in Appendix A.5.2. 

FORTRAN IV has conditional compilation facilities imple 
mented by an X in column 1 of a source statement. When 
the X appears io the /FORT directive, all source statements 
with an X in column 1 are compiled (the X appears on the 
LO listing as a blank). When the X is not present, all 
conditional statements are ignored by the compiler. X lines 
are assigned listing numbers in either case, but the source 
statement is printed only when the X is present. 

FORTRAN IV has a symbol table area for approximately 70 
symbols (i.e., names), if none of the logical units used is 
assigned to an RMD device. Each RMD assignment 
requires buffer space of 120 words (except when BO - GO 
=* RMD T in which case BO and GO use the same buffer) 
and the symbol capacity is reduced by 24 symbols per 
buffer. To increase the symbol-table area, input before the 
/FORT directive a /MEM directive (section 4.2.5), where 
each 512-word block enlarges the capacity of the table by 
100 symbols. If a larger symbol table is used, greater 
subexpression optimization is possible. 

A VORTEX physical record on an RMD is 120 words. Source 
records are blocked three 40-word records per VORTEX 
physical record, object modules are blocked two 60 word 
modules per record, and list modules are output one record 
per physical record. However, in the case where SI - Pt * 



RMD, records are not blocked but assumed to be one per 
VORTEX physical record. When the file contains more than 
one source module, each new source module must start at 
a physical record boundary. The unused portion of the last 
physical record of the previous module should be padded 
with blanks. 

Table 5-2 lists the VORTEX real time executive (RTE) 
service request macros available through FORTRAN IV. 
These macros are detailed in section 2.1. 



Table 5 2. RTE Macros Available Through FORTRAN IV 



ABORT 


EXIT 


SCHED 


ALOC 


OVLAY 


SUSPND 


DELAY 


PMSK 


TIME 


LDBLAY 


RESUME 


PASS 



5.3.1 FORTRAN IV Enhancements 

The VORTEX FORTRAN IV language additions and en- 
hancements make the VORTEX FORTRAN compiler more 
consistent with IBM FORTRAN (level G). Except for these 
additions and enhancements. FORTRAN compilation and 
execution with the VORTEX operating system is the same 
as with the Master Operating System (MOS) described in 
the FORTRAN IV Reference Manual (98 A 9902 03x). 

FORTRAN-complied programs can execute in either fore 
ground or background 

Detailed information on the VORTEX FORTRAN IV Ian 
guage additions and enhancements are given in the 
VORTEX FORTRAN IV Reference Manual (98 A 9902 04x) 



5.3.1.1 Variables 

VORTEX FORTRAN IV variables are identifiers which 
consist of a string of one to six alphanumeric characters 
and correspond to the type of data the variable represents 
Variables are classified into the following five fundamental 
types; INTEGER. REAL. DOUBLE PRECISION, COMPLEX. 
and LOGICAL 

The following list shows each variable type with its 
associated standard and optional length (in bytes): 
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Variable Type 


Standard 


Optto 


INTEGER 

REAL 

COMPLEX 

LOGICAL 

DOUBLE PRECISION 


2 
4 
8 
2 
8 


4 
8 



where 



5.3.1.2 Constants 



ts a 1 to 16 hexadecimal digit string. 



The maximum number of digits allowed in a hexadecimal 
constant depends on the length specification of the 
variable being initialized. If the number of digits is greater 
than the maximum, the leftmost digits are truncated. If 
the number is less than the maximum, the leftmost 
positions are filled with zeros. 



There are four categories of VORTEX FORTRAN IV con 
stants: NUMERICAL, LOGICAL LITERAL, and HEXADECI 
MAL. These four constant data constructions are discussed 
below. 

NUMERICAL constants are integer, real, or complex 
numbers. Integer constants may be positive, zero, or 
negative. If the constant has so sign, it is interpreted as 
representing a positive value. If a zero is specified, with or 
without a preceding sign, the sign will have no effect on the 
value zero. The constant has the general form 



sn 



where 



is the optional signed character 
( + or -). 



5.3.1.3 IMPLICIT Statement 

The IMPLICIT statement must be the first statement in a 
main program or the second statement in a subprogram. 
The statement enables the user to specify the type, 
including length of all variables, arrays, and function 
names. The statement has the general form 



IMPLICIT type •stal,...,) 



where 



type 



♦s 



is a type name. 

is optional; and, represents one of the 
permissible length specifications (see 
variable). 



is a decimal character string 
(maximum magnitude is 1073741823). 



is an initial character string 
(A, B Z,$.) in that order 



LOGICAL constants allow for the use of logical operations 
through the medium of the logical expression. Thus, two 
logical constants are provided to represent the "true" and 
false ' logical values. The constant has the general form 

TRUE, or .FALSE. 

LITERAL constants are a string of alphanumeric and/or 
special characters. If apsostrophes delimit the literal, a 
single apostrophe within the literal is represented by two 
apostrophes. The number of characters in a string, 
including blanks, may not be less than 1 or greater than 
255. Blanks within the character string will be considered 
part of the string. The constant has the general form 

wHs or 's' 

where 

w is a positive non-zero constant denoting 

the width of the character string. 

s denotes the character string. 

HEXADECIMAL constant consists of the letter Z followed by 
1 to 16 hexadecimal digits. The constant has the general 
form 



Zn 



5.3. L4 Explicit Type Statements 

The Explicit Type Specification statement declares the type 
of variable, function name, statement function name, or 
array by its name rather than by its initial character. 
Optionally, it may also initialize the variable. The statement 
overrides the IMPLICIT statement, which in turn overrides 
the predefined convention. The statement has the general 
form 



type*s al*sl(fcj)/xl/, 



where 



type 
*s 



CO 



is a type name. 

is optional; and, represents one of 
the permissible length specifications. 

is a variable, array, or function 
name. 

is optional; and, gives dimension 
information for arrays When the 
TYPE statement in which it appears 
is in a subprogram, k may contain 
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/x/ 



integer variables of length 2 
(section 5.3.1.1), provided that 
the array is a dummy argument. 

is optional; and, represents 
initial data values (see DATA 
statement). 



where 



is a string of one to five decimal 
digits. 

is a literal constant enclosed in 
apostrophes. 



5.3.1.5 DOUBLE PRECISION Statement 

The DOUBLE PRECISION statement overrides any specifi 
cation of a variable made by either the predefined 
convention or the IMPLICIT statement The statement has 
the general form 



DOUBLE PRECISION a(M. 



where 



(k) 



represents a variable, array, or 
function name 

is optional; and, is composed of 
one to seven unsigned integer con 
stants that represent the maximum 
value of each subscript in the 
array, k may contain integer 
variables of length 2, provided 
that the array is a dummy argument. 



5.3.1.8 CALL Statement 

The execution of the CALL statement causes the specified 
subroutine to be executed. The CALL statement arguments 
must agree in number and order of appearance with the 
dummy arguments in the SUBROUTINE statement. The 
statement has the general form 



CALL name (al T a2),. 



where 



name is the name of a SUBROUTINE 

subprogram. 

a is an actual argument that is 

being supplied to the SUBROUTINE 
subprogram. The argument may be 
a variable array element, array 
name, literal, or arithmetic or 
logical expression. Each a may 
also be of the form n, where n 
is a statement number. 



5.3.1.6 PAUSE Statement 



The execution of the PAUSE statement causes the uncondi 
tional suspension (SUSPND) of the object program being 
executed pending operator action. To resume the sus 
pended task, input the operator communication key in 
request RESUME. The statement has the general form 

PAUSE 

or 

PAUSE n or PAUSE m 



where 



m 



is a string of one to five 
decimal digits. 

is a literal constant enclosed 
in apostrophes. 



5.3.1.9 RETURN Statement 

The RETURN statement provides the method by which the 
calling "program is reentered following the execution of a 
subprogram. The normal sequence of execution following 
the RETURN statement of a SUBROUTINE subprogram is 
to jhe next statement following the CALL statement in the 
calftng program. The statement has the general form 



RETURN or RETURN < 



wherelf- 



5.3.1.7 STOP Statement 



is an integer constant or variable 
whose value, for example n, denotes 
the nth asterisk in the argument 
list of a SUBROUTINE statement. 
RETURN f may be specified only in 
a -SUBROUTINE subprogram. 



The execution of the STOP statement causes the uncondi 
tional termination of the execution of the object program 
beging executed. The statement has the general form 

STOP 

or 

STOP n or STOP m 



5.3.1.10 READ/WRITE Statements 

VORTEX FORTRAN IV allows two optional parameters to 
the READ/WRITE statements. These optional parameters 
allow for conditional exits on an end of data or transmis- 
sion error. 
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Example: READ(4,10.ERR = 105.END = 200)A,B 

In the above example, control will be transferred to 
statement 105 if an I/O error occurs, or to statement 200 if 
an end of-data occurs on unit 4 



points to the record immediately 
following the last record 
transmitted. 



5.3.1.13 Direct-Access READ Statement 



5.3.1.11 ENCODE/DECODE Statement 

ENCODE /DECODE statements perform data conversion 
according to a FORMAT statement without performing 
external I/O operations. ENCODE statement takes an I/O 
list, converts each element and places it in a specified 
buffer. DECODE statement words from the buffer into the 
I/O list. For example: 

DIMENSION 1(40) 

READ(CDR, 10)1 
10 FORMAT* 4 0A2) 

DECODE ( 10,20,I)K,L 
20 FORMAT (215) 

These statements read an ASCII card image into array I. 
The first two fields of five ASCII characters are then 
decoded into their integer equivalent and placed into the 
variables K and L 



5.3.1.12 Direct-Access INPUT/OUTPUT 
Statements 

The direct access INPUT/OUTPUT statements allows a 
programmer to go directly to any point in a file which 
resides on an RMD, and process a record without having to 
process all the records within the file. To use direct-access 
INPUT/OUTPUT statements (READ, WRITE, and FIND), 
the file<s) to be operated on must be described with a 
DEFINE FILE statement. The statement has the general 
form 



The READ statement causes data to be transferred from a 
direct-access device into internal storage. The statement 
has the general form 



READ(ar,b,ERR = Ec)//sf 



where 



ERR » EC 



list 



specifies the unit number 
and must be followed by an 
apostrophe 

represents the relative 
position of a record within 
the file. 

is optional; and, if given, 
is either the statement 
number of the FORMAT state 
ment, or the name of an array 
that contains an object-time 
format 

is optional; and, specifies 
the number of a statement to 
which control is given when 
an error condition is 
encountered 

is optional; and, is an I/O 
list. The I/O list must not 
contain the associated 
variable 



where 



DEFINE FILE aKml.rl.fl.vl),. 



specifies the unit number. 

represents the relative position 
of a record within the file 



5,3.1.14 Direct-Access WRITE Statement 

The WRITE statement causes data to be transferred from 
internal storage to a direct access device. The statement 
has the general form 

WRITE (a'r.bVist 



specifies the maximum size of 
each record in the file. 

specifies whether the file is 
to be read or written with or 
without format control. 



where 



specifies the unit number and 
must be followed by an apostrophe 
represents the relative position 
of a record within the file. 



specifies an integer variable 
(not an array element) called 
an associated variable, which 



is optional; and. if given, is 
either the statement number of 
the FORMAT statement, or the 
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name of an array that contains 
an object-time format. 

fist is optional; and, is an I/O 

list. The list must not 
contain the associated vari- 
able. 



5.3.1.15 FIND Statement 

The FIND statement causes the next input record to be 
found white the present record is being processed. The 
statement has the general form 



where 

name is the title to be output. 

JtyLi'tJfi- cjanjains up to 
^eithLcbarattsrit Jffldjs 

output »n_the object text ~*£ 

as the name by- whk±^Die_ 
^program is, to be„ referenced 

by^MAIN. 

If a TITLE statement is used, it must be the first source 
statement. A TITLE statement forces a page eject on the LO 
listing. 



FIND (a'r) 



where 



a specifies the unit number and must 
be followed by an apostrophe. 

r represents the relative position of 

a record within the file. 

At the conclustlon of a FIND operation, the associated 
variable points to the record found. 



5.3.1.18 Subprogram Multiple Entry 

VORTEX FORTRAN IV facilitiates multiple entry into 
SUBROUTINE and FUNCTION subprograms by specifying a 
CALL statement or a FUNCTION reference that refers to an 
ENTRY statement in the subprogram. Entry is made at the 
first executable statement following the ENTRY statement. 
The statement has the general form 



ENTRY name(al,a2,a3),. 



where 



5.3.1.16 DATA Statement 

The DATA statement is used to define initial values of 
variables, array elements, and arrays. This statement 
cannot precede any specification statement that refers to 
the same variables, array elements, or arrays. The DATA 
statement may not precede an IMPLICIT statement. It has 
the general form 

DATA k/d/,... 



where 



is a list containing variables, 
array elements, or array names. 

is a list of constants (integer, 
real, complex, hexadecimal, logical, 
or literal), any of which may be 
preceded by i*, where t* 
indicates that the constant is to 
be specified i times. 



5.3.1.17 TITLE Statement 

The TITLE statement declares a module name which is 
output to the top of each page of the source listing and to 
the object module. It has the general form 

TITLE name 



name is the name of an entry point 

a is a dummy argument corresponding 

to an actual argument in a CALL 
statement or FUNCTION reference 



5.3.1.19 SUBROUTINE Subprogram 

The SUBROUTINE subprogram may contain any FORTRAN 
IV statement except a FUNCTION statement, another 
SUBROUTINE statement, or an BLOCK DATA statement If 
an IMPLICIT statement is specified, it must immediately 
follow the SUBROUTINE statement. SUBROUTINE has the 
general form 

SUtROUTINE name(al,a2,a3),... 



where 



name is the SUBROUTINE name. 

a is a distinct dummy argument. 

Each argument used must be a 
variable or array name, the dummy 
name of another SUBROUTINE, FUNCTION 
subprogram, or an asterisk "•" 
which denotes a return point specified 
by a statement number in the calling 
program. 

The actual arguments can be: 
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• A literal, arithmetic, or logtcal constant 

• Any type of variable or array element 

• Any type of array name 

• Any type of arithmetic or logical expression 

• The name of a FUNCTION or SUBROUTINE 
subprogram 

• A statement number 



5.3.1.20 FUNCTION Subprogram 

The FUNCTION subprogram is an independent subprogram 
consisting of a FUNCTION statement and at least one 
RETURN statement. It has the general form 



type FUNCTION name* s<al,a2,a3). 



where 



rype is INTEGER, REAL, DOUBLE 

PRECISION, COMPLEX, or 
LOGICAL. Its inclusion 
is optional. 

name is the name of the 

FUNCTION. 

•s represents one of the 

permissible length 
specifications 

a is a dummy argument or 

dummay SUBROUTINE name or 
other FUNCTION subprogram. 



5.3.1.21 Subscripts 

A subscript is a set of integer subscript quantities that are 
associated with an array name to identify a particular 
element of the array. A maximum of seven subscript 
quantities, separated by commas, can appear in a 
subscript. The following rules apply to the construction of 
subscript quantities: 

• Subscript quantities may contain arithmetic 
expressions that use any of the arithmetic operators: 
+ . , *. /. ** 

• Subscript quantities may contain FUNCTION 
references 

• Subscript quantities may contain array elements 

• Integer and real mixed-mode expressions within 
subscript quantities are evaluated according to normal 



FORTRAN rules. If the evaluated expression is real, it 
is converted to integer 

The evaluated result of a subscript quantity should 
always be greater than zero 



5.3.1.22 Z Format Code 

The hexadecimal Z format code causes a string of 
hexadecimal digits to be interpreted as a hexadecimal 
value and to be associated with the corresponding i/0 list 
element for purposes of data transmitting. It has the 
general form 



Zw 



where 



w denotes a string of hexadecimal 
digits. The maximum value that 
can be read is FFFFFFFFFFFFFFFF 

On input, if an input field contains an odd number of 
digits, the number will be padded on the left with a 
hexadecimal zero when it is stored. 

On output, if the number of characters in the storage 
location is less than w, the left-most print positions are 
filled with blanks. If the number of characters in the 
storage location is greater than w, the leftmost digits are 
truncated and the rest of the number is printed. 



5.3.2 Execution-Time I/O Units 

All FORTRAN I/O statements (FORTRAN IV manual) 
include a FORTRAN unit number (FUN) or name, which 
may or may not be identical with the logical unit containing 
the required file(s). Four different cases of FORTRAN units 
must be distinguished as indicated in figure 5-4. 



Case 1, non-RMD unit: The logical-unit number is 
assigned to the device by SGEN (section 15) or by the JCP 
/ASSIGN directive (section 4.2.6), where the FORTRAN unit 
number is identical with that of the file unit. Thus, to 
rewind the PO logical unit (unit 10, magnetic-tape unit 0), 
the job stack can be: 



/ASSIGN, PO-MT00 
/FORT 



RBWIND 10 
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/FORT.L.B 



Caw 2, RMD fHe executing in background only: The JCP 
/PFILE directive (section 4.2.11) positions the PI unit to a 
background reassignable logical unit, and loads a global 
FC8. As in case 1, the FORTRAN unit number is identical 
with that of the file unit. Thus, to read the file FILE1 on 
logical unit 50 (protection code X) where PI is logical unit 4, 
the job stack can be: 



READ (4, 



END 



C tu " ) 



CHECK ACTIVE FCB 
CHAIN FOR ONE 
ASSOCIATED WITH 
FUN 




ASSOCIATED 
FCB FOUND 



YES 



NO 




NO 



CONSTRUCT AND 
EXECUTE IOC CALL 



YES 



BACKGROUND 
PROG RAW 



CASE 




YES 



NO ^ ACTIVE 

GLOBAL FCB FOR 
FUN 



YES 




LOG I/O ERROR 



CONSTRUCT AND 
EXECUTE !OC CALL 
(FUN - LUN) 



CONSTRUCT DCB AND 
EXECUTE IOC CALL 
(FUN - LUN) 



C FINtSHj V ) t FINISH \ f FINISH ^ 



VTII-144S 



NOTE: THE FORTRAN LOGICAL UNIT FUN IS NOT NECES5ARILY IDENTICAL WITH 
THE FILE LOGICAL UNIT (LUN) UNLESS SO INDICATED. 
VJOPEN OVERRIDES A /PFILE ASSIGNMENT. 



Figure 5-4. FORTRAN I/O Execution Sciences 
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/ASSIGN, PI-50 

/PFILE ( 4,X,FILE1 

/EXBCC 



Case 3, normal RMD file executing in foreground or 
background: the CALL V$OPEN statement associates any 
specified RMD file with the FORTRAN unit number. The 
CALL V$OP£N statement overrides any /PFILE assignment 
(case 2). The format of the statement is: 



CALL V$OPEN(fun 1 lun t name I mode) 



where 



'un is the name or number of the 

FORTRAN unit which may be num 
enc value, defined by a DATA 
statement, or an assignment 
statement 



READ (2, . . . 

executes an IOC READ call, reading from FIL using IFCB as 
the FCB. 



Note: V$OPEN sets the record length to 120 words and 
the access method to 3, sequential access using relative 
VORTEX physical record number within the file. The user 
should not change the record length or access method 
parameters in the FCB because the FORTRAN Run Time 
I/O package has reserved only a 120 word buffer. 

Any record in a file opened by V$OPEN can be directly 
accessed by operating on the FCB array. Thus, using the 
job stack in the previous example, record 61 in file FIL is 
read by inputting 



tun is the name or number of the 

logical unit which may be 
numeric value, defined by a 
DATA statement, or an assignment 
statement 



IFCBU)«61 
READ(2, . . . 



name is the name of the 13-word array 

containing the file name and the 
protection code 

mode is the mode of the l/Ocontrol 

open macro (section 3.5.1) 



VSOPEN constructs an FCB in the first ten words of the 
specified 13-word array, performs an IOC OPEN on this 
FCB, and links it with the active FCB chain. The remaining 
three words of the array contain an FCB-chain link, the 
FORTRAN unit number, and the file logical unit number. 
Thus, to reference file FIL on logical unit 20 (protection 
code Q) by the number 2, rewinding upon opening, the job 
stack can be: 



/fort 



To dissolve an existing association between an RMD file 
and a FORTRAN logical unit, use the CALL V$CLOS 
statement of the format. 



CALL V9CLOS(fun,mode) 



where 



fun 



is the name or number of the FORTRAN 
logical unit 

is the mode of the l/O-control CLOSE 
macro (section 3.5.2) 



Thus, when the processing of file FIL in the previous 
example is complete, to close/update FIL and take IFCB off 
the active FCB chain so that FORTRAN statements with fun 
- 2 no longer reference FIL, the job stack can be: 



DIMENSION IFCB( 13) 
DATA IPCB( 3)/2H Q/ 
DATA IFCBU) ,IFCB<9> , IFCB( 10)/2HFI,2HL , 2H / 



CALL 



V$CLOS(2, 1 ) 



CALL V»OPBN(2,20,IFCB,0) 



File FIL can now be referenced by FORTRAN statements by 
using 2 as the designation of the FORTRAN logical unit. For 
instance, 



Note: the auxiliary_FORTRAN I/O statements Jtl WIN ID, t 
jfeACKSPACp and ENDFILElcannot be used with RMD files* 
Use instead (where IFCB is the ECB array): 

irCBU) - 1 For rewind 

IFCBm - irCB(4) -1 For backspace 

CALL V|CLOS(fun, 1) For endfife 
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Case 4, blocked RMD file executing in foreground or 
background: the CALL V$OPNB statement associates any 
specified RMD file with a FORTRAN unit number. This 
statement overrides any /PFILE statement. The format is: 

CALL V$OPNB (fun, kin, name, mode, recsz, buff, rbwfl) 

where 



Q(x/y) means the quotient of x/y 
R(x/y) means .the remainder of x/y 



fun 



kin 



name 



mode 



recsz 



buff 



rbwfl 



is the name or number of the 
FORTRAN unit which may be 
numeric value, defined in a 
DATA statement, or an assign- 
ment statement 

is the name or number of the 
file logical unit which may be 
numeric value, defined in a DATA 
statement, or an assignment 
statement 

is the name of a 14 word FCB 
array 

is the mode of the I/O control 
OPEN macro 

is the logical record size in 
words 

is the address of a blocking 
buffer array 

is the read before write flag 



The first parameters are identical in function to those of 
the CALL V$OPEN statement. The other three specify 
blocking information. 

An RMD file opened by a CALL V$OPNB statement is 
processed as though it were a consecutive series of logical 
records, each one recsz words in length. These logical 
records continue across physical record boundaries with no 
space wasted (except possibly at the end of file). Input and 
output is buffered through the user-supplied buffer array 
buff as specified above. 

Since actual physical I/O is performed on buff, the file must 
be large enough to do I/O on the end of the last logical 
record. It is sufficient to allocate RMD space for one more 
logical record than will ever be used. 

It is the user's responsibility to declare the size of the 
buffer array buff sufficiently large, remembering that it is a 
function of the logical record size recsz, that it must be a 
multiple of the basic record size of 120, and that it must be 
large enough to include enough basic 120-word physical 
records to cover a logical record, even though the physical 
record may overlap the physical record boundaries. The 
following tables specify all conditions, where: 



recsz < 120 




R(120/recsz) 


Size of Array Buff 


« 
* 


120 words 
240 words 


recsz £ 1 2 




R(recsz/120) 


Size of Array Buff 


- 

= 1 
> 1 


recsz 

120 * (1 + Q(recsz/120)) 

120 * (2 + Q( recsz/ 120)) 



if recsz is not a multiple or factor of 120 words, the 
blocking buffer buff must allow room for an extra 120-word 
physical record at the start or end of a logical record. 

On a WRITE operation where recsz is not a multiple of 120 
words, data on the RMD can be overwritten unless a read 
before-write is performed. In some situations, such as 
initial file creation in a strictly sequential fashion, this is 
unnecessary and slow. 

The parameter rbwfl allows the user to select this feature. 
If rbwfl is zero, read before-write is disabled. Any non zero 
value enables read before write. 

Example: An RMD file opened by CALL VSOPNB can be 
accessed randomly, as with CALL V$OPEN, by a replace 
ment statement using the logical record number. 

/PORT 

DIMENSION IFCBt 14) ,IBUFF( 120) 
DATA IFCBt 3) , IPCB<8) , IFCBt 9) , IFCBt 10) 

/0,2HBL,2HFI , 2HLE/ 
CALL V*OPNB(2, 10, IFCB, 0, 10, IBUFF, 1) 
IFCB(4) - 5 
READ (2) I 
READ t 2 ) J 

This sequence causes the un keyed file name BLFILE on 
logical unit 10 to be opened and assigned FORTRAN unit 
number 2. The first READ statement causes the entire first 
120-word physical record (first 12 logical records) to be 
input into blocking buffer IBUFF, and the first word of the 
fifth logical record to be transferred to I . The second READ 
would not require another physical input for record 6 in 
IBUFF. This READ statement would simply transfer the first 
word of logical record 6 to J. 

To flush the blocking buffer, close the file and disassociate 
the FORTRAN and logical unit numbers the CALL V$CLSB 
statement is provided. Its format is: 

CALL V$CLSB (fun.mode) 
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where 



fun 
mode 



is the FORTRAN unit number 

is the mode of the I/O control CLOSE 
macro 



The end of file information in a FILE NAME DIRECTORY 
refers to a physical 120 word record number. Therefore, if 
logical record size is not a multiple of 120 words, the user 
may need to define his own end of file mark. Close and 
Update, Open and Leave, and IOCHK (section 5 3.4) EOF 
features all operate on this File Name Directory parameter 
referring strictly to 120-word physical record numbers. 



5.3.3 Runtime I/O Exceptions 

The FORTRAN runtime I/O program allows a program to 
detect I/O errors and end of file or end of device condi 
tions. Status of a READ or WRITE operation is available 
immediately after the operation is complete and before 
another I/O operation is executed. This status can be 
checked by executing a subroutine or function call in the 
form. 



Iabel(2) is a statement label to 

which control is to be 
transferred if the op 
eration was completed 
normally. 

Iabel(3) is a statement label to 

which control is trans 
ferred, if an end-of-file 
or end-of-device was en 
countered. 

If the program does not check the status of a READ or 
WRITE operation in which an error occurs. FORTRAN will 
abort execution of the task upon the next entry *o the 
runtime I/O routine. At that time the diagnostic message 
will be output to the System Output device. Any data which 
is input to a read in which an error occurred will be invalid. 
After a call to IOCHK is executed, any error status is reset 
and the program may proceed with additional input and /or 
output. 



5.3.4 Reentrant Runtime I/O 



CALL lOCHK(status) 

where status is the name of an integer variable which is to 
receive the result of the status check. 

If the last I/O operation had been completed normally, the 
value of zero will be returned If an error had occurred, the 
value minus one is returned. If either an end of file or an 
end-of device had occurred, the value positive one will be 
returned. 

The status may be checked and the result tested in a single 
statement by use of the form 

IF (lOCHK(status)) labeKl), labeK2), labeK3) 



The VORTEX runtime I/O program processes all FORTRAN 
READ, WRITE, auxiliary I/O, and open and close state- 
ments at execution time. It is composed of two modules, 
V$FORTIO and the reentrant task V$RERR. Both are in the 
OM library. V$RERR is also in the nucleus portion of the 
SGL. SGEN then automatically loads V$RERR in the 
VORTEX nucleus, and all FORTRAN programs autcmati 
cally link to it. If V$RERR is not desired in the VORTEX 
nucleus, the SGEN directive DEL, V$RERR must be entered 
during system generation. Each FORTRAN program will 
then get its own copy of V$RERR from the OM library. 
V$RERR is approximately 3K words long. 



5.4 RPG IV COMPILER 



where 



5.4.1 Introduction 



status 



labeM) 



is the name of an integer 
variable which receives the 
result of the status check. 
A value of zero indicates 
normal completion. A neg- 
ative non zero value indi 
cates an error. A positive 
non zero value indicates 
EOF or EOD. 

is a statement label 
to which control is 
transferred, if an I/O 
error occurred 



The VORTEX RPG IV System is a software package for 
general data processing applications. It combines verstile 
file and record defining capabilities with powerful process 
ing statements to solve a wide range of applications. It is 
particularly effective in processing data for reports. The 
VORTEX RPG IV system consists of the RPG IV compiter 
and RPG IV runtime/loader program. 



The VORTEX RPG IV compiler and the runtime/loader 
execute as level zero background programs in unprotected 
memory. Both the compiler and the runtime/loader will 
operate in 6K of memory with limited work stack space. 
The stack space may be expanded and consequently larger 
RPG programs compiled and executed by use of the /MEM 
directive. 
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The RPG language, and its compilation and execution 
under VORTEX is described in the Varian 620 RPG iV 
User's Manual (98 A 9947 03x). 

Error messages applicable to the RPG IV compiler are given 
in Appendix A. 



5.4.2 RPG IV I/O Units 

The RPG IV compiler reads source records from the 
Processor Input (PI) file, write object records on the Binary 
Output (BO) file, and lists the source program on the List 
Output (LO) file. 

The RPG iV runtime/loader will normally load the RPG 
object program from the Binary Input (Bl) file. When the 
program executes, the READ CARD, PUNCH and PRINT 
statements are performed on logical units 13, 14, and 15 
respectively, statements for performing input and output to 
logical units 16 through 22. 

5.4.3 Compiler and Runtime Execution 

The RPG compiler and the runtime package should be 
cataloged into the background library (BL) using LMGEN 

The compiler and runtime package should be defined as 
background unprotected tasks with the names PRGC and 
RPGRT, respectively. 

The compiler is scheduled from the background library by 
the directive 

/LOAD,RPGC 



5.5 RPG (I COMPILER 



5.5.1 Introduction 

The VORTEX RPG II System is an industry compatible 
software package for general data processing applications. 
It combines versatile file and record defining capabilities 
with powerful processing statements to solve a wide range 
of applications. It is particulary effective in processing data 
for reports. The VORTEX RPG II system consists of the RPG 
II compiler and RPG II runtime interpreter. 

The VORTEX RPG II compiler executes as a level one 
background program in unprotected memory. The compiler 
will operate in 4K of memory with limited work space. The 
work space may be expanded and consequently larger RPG 
programs may be compiled by use of the /MEM directive. 

The RPG II language, and its compilation and execution 
under VORTEX is described in the RPG II User's Manual 



5.5.2 RPG II I/O Units 

The RPG II compiler reads source records from the 
Processor Input (PI) file, writes object records on the 
Binary Output (BO) file, and lists the source program on 
the List Output (LO) file. Optionally, object records may be 
written on the GO file. 



The compiler terminates wvhen the required ENO statement 
in the RPG program is encountered. The compiler exits to 
the executive. Theie is no provision for stacking multiple 
compilations or for operating in compile and-go mode. 

The compiler rewinds the PI, BO, and LO files at the 
beginning of the compilation. 

The run time /loader is scheduled from the background 
library by the directive 

/LOAD, RPGRT 

The loader expects the RPG object program is on the Binary 
Input (Bl), and loads and executes it. If the load directive 
contains the name of an RPG program to be loaded in the 
form, 

/LOAD , RPGRT , name 

the runtime/loader will assume the program mentioned is 
in the background library and will load it from there. An 
RPG object program may be 'cataloged' into the back- 
ground library by creating a directory entry and allocating 
file space with FMAIN and copying the RPG object program 
into the file with IOUTIL 



5.5.3 Compiler and Runtime Execution 

The RPG II compiler and the runtime package should be 
cataloged into the background library (BL) using LMGEN. 

The compiler and runtime package should be defined as a 
background unprotected task, with the name RPG. 

The compiler is scheduled from the background library by 
the directive: 

/RPG 

The compiler terminates when the required * statement in 
the RPG program is encountered The compiler exits to the 
executive. There is no provision for stacking multiple 
compilations or for operating in compile-and-go mode 

The compiler rewinds PI, BO, and LO files at the beginning 
of the compilation 

An RPG object program may be cataloged' into the 
background library by creating a directory entry and 
allocating file space with FMAIN and copying the RPG 
object program into the file with IOUTIL 



bn 



SECTION 6 

LOAD-MODULE GENERATOR 



The toad moduli generator (LHAGEN) is a background task 
that generates background and foreground tasks from 
relocatable object modules. The tasks can be generated 
with or without overlays, and are *in a form called load 
modules. 

To be scheduled for execution within the VORTEX operating 
system, all tasks must be generated as load modules. 



6.1 ORGANIZATION 

LMGEN is scheduled for execution by inputting the job- 
control processor (JCP) directive /LMGEN (section 4.2.19). 



LMGEN has a symbol table area for 200 symbols at five 
words per symbol. To increase this area, input a /MEM 
directive (section 4.2.5), where each 512-word block will 
enlarge the capacity of the table by 100 symbols. 



a foreground task, no object module loaded can contain 
instructions that use addressing modes utilizing the first 
2K of memory, other than the base page (page 0). No 
assembler generated indirects or literals are allowed 

A VORTEX physical record on an RMD is 120 words Object 
module records are blocked two 60-word records per 
VORTEX physical record. However, in the case of an RMD 
assigned as the SI logical unit, object modules are not 
blocked but assumed to be one object module record per 
physical record. 

Error-recovery Inputs are entered by the operator on the 
SO logical unit to recover from errors in load module 
generation. Error messages applicable to this component 
are given in Appendix A.6. 

Recovery from the type of error represented by invalid 
directives or parameters is by either of the following: 



a. Input the character C on the SO unit, thus directing 
LMGEN to go to the S; unit for the next directive 



INPUTS to the LMGEN comprise: 

• Load-module generator directives (section 6.2) input 
through the SI logical unit. 

• Relocatable object modules from which the load module 
is generated. 

• Error-recovery inputs entered via the SO logical unit. 



Load-module generator directives define the load module 
to be generated. They specify the task types (unprotected 
background or protected foreground) and the locations of 
the object modules to be used for generation of the load 
modules. The directives supply information for the catalog 
mg of files, i.e., for storage of the files and the generation 
of file directory entries for them. LMGEN directives also 
provide overlay and loading information. The directives are 
input through the SI logical unit and listed on the LO 
logical unit. If the SI logical unit is a Teletype or a CRT 
device, the message LM** is output on it to indicate that 
the SI unit is waiting for LMGEN input. 

Relocatable object modules are used by LMGEN to 
generate the load modules. The outputs from both the DAS 
MR assembler and the FORTRAN compiler are in the form 
of relocatable object modules. Relocatable object modules 
can reside on any VORTEX system logical unit and are 
loaded until an end-of-file mark is found. The last execution 
address encountered while generating a segment (root or 
overlay, section 6.1.1) becomes the execution address for 
that segment (Note: If the load module being generated is 



b. input the corrected directive on the SO unit for 
processing. The next LMGEN directive is then input 
from the SI unit. 



If recovery is not desired, input a JCP directive (section 
4.2) on the SO unit to abort the LMGEN task and schedule 
the JCP for execution. (Note: An irrecoverable error, e.g.. 
I/O device failure, causes LMGEN to abort. Examine the 
I/O error messages and directive inputs to determine the 
source of such an error.) 



OUTPUTS from the LMGEN comprise: 

• Load modules generated by the LMGEN 

Error messages 

Load-module maps output upon completion of a load 
module generation 



Load modules are LMGEN-generated absolute or relocat 
able tasks with or without overlays. They contain all 
information required for execution under the VORTEX 
operating system. During their generation, LMGEN uses the 
SW logical unit as a work untt. Upon completion of the 
load-module generation, the module is thus resident on the 
SW unit. LMGEN can then specify that the module be 
cataloged on another unit, if required, and output the load 
module to that unit. Figure 6-1 shows the structure of a 
load module. 
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All foreground tasks share the foreground blank common 
area but may have their own named common area. 

Figure 6-1. Loed-Moduk Overlay Structure (virtue! memory) 



Note: LMGEN locks out the partition while it is modifying 
the directory. 

Error messages applicable to the load-module generator 
are output on the SO and LO logical units. The individual 
messages, errors, and possible recovery actions are given in 
appendix A. 6. 



Load-module maps are output on the LO logical unit upon 
completion of the load-module generation, unless sup- 
pressed. The maps show all entry and external names and 
labeled data blocks. They also describe the items given as 
defined or undefined, and as absolute or relocatable, and 
indicate the relative location of the items. The load-module 
map lists the items in the format, four entries per line: 



Print position 



2 3 4 5 6 7 8 


9 10 11 


12 13 14 15 16 


item 


b x b 


location 



where 



item 



location 



is a left-justified entry or external name or 
labeled data block 

is a blank 

is A for an absolute or R for e relocatable item 

is the left-justified relative location of the item 
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The following appear at the end of the LMGEN map. 

[$IAP] Top of indirect address pool, which 

begins at 0500 



[SLIT] Bottom of literal pool, which begins at 

0777 

[SPED] Last loaded location. Foreground, word 

size of load module. Background, last 
location loaded (loading begins at 
01000). 

LMGEN performs special handling for an external of the 
form VSPED'. LMGEN satisfies this external with the last 
loaded location plus one of the load modules for both 
overlayed and non-overlayed tasks. This external can be 
used for specifying table areas behind tasks that link with 
external routines. 



6.1.2 Common 

Common is the area of memory used by linked programs 
for data storage, i.e., an area common to more than one 
program. There are two types of common: named common 
and blank common. (Refer to the FORTRAN IV Reference 

Manual, document number 98 A 9902 03x, or the DAS MR 
COMN directive description in the computer handbook, for 
the system being used. 

Named common is contained within a task and is used for 
communication among the subprograms within that task. 

Blank common can be used like named common or for 
communication among foreground tasks. 

The extent of blank common for foreground tasks is 
determined at system generation time. The size of the 
foreground blank common can vary within each task 
without disturbing the positional relationship of entries but 
cannot exceed the limits set at system generation time 



6.1.1 Overlays 

Load modules can be generated with or without overlays. 
Load modules with overlays are generated when task 
requirements exceed core allocation. In this case, the task 
is divided into overlay segments that can be called as 
required. Load modules with overlays are generated by use 
of the OV directive (section 6.2.3) and comprise a root 
segment and two or more overlay segments (figure 6-1), 
but only the root segment and one overlay segment can be 
in memory at any given time. Overlays can contain 
executable codes, data, or both. 

When a load module with overlays is loaded, control 
transfers to the root segment, which is in main memory 
The root segment can then call overlay segments as 
required. 



The extent of blank common for background tasks is 
allocated within the load module. The size of the back 
ground blank common can vary within each task, but the 
combined area of the load module and common cannot 
exceed available memory. 

Each blank common is accessible only by the correspond 
ing tasks, i.e., foreground tasks use only foreground blank 
common, and background tasks use only background 
blank common 

All definitions of named and blank common areas for a 
given load module must be in the first ob|ect module 
loaded to generate that load module. 



6.2 LOADMODULE GENERATOR DIRECTIVES 



Called overlay segments may or may not be executed, 
depending on the nature of the segment. It can be an 
executable routine, or it can be a table called for searching 
or manipulation, for example. Whether or not the segment 
consists of executable data, it must have an entry point. 

The generation of the load module begins with the root 
segment, but overlay segments can be generated in any 

order. 



TIDB 

LD 

OV 

LIB 

CLD 

MEM 
END 



Create task identification block 
Load relocatable object modules 
Overlay 
Library search 

Load relocatable object modules 
without re-opening or repositioning 
Default extra memory pages 



The root segment can reference only addresses contained 
within itself. An overlay segment can reference addresses 
contained within itself or within the root segment. Thus, all 
entry points referenced within the root segment or an 
overlay segment are defined for that segment and 
segments subordinate to it, if any. 

For an explanation of DAS MR and FORTRAN calls to 
overlays see section 2. 1.8 



Load-module generator directives begin in column 1 and 
comprise sequences of character strings having no embed 
ded blanks. The character strings are separated by 
commas (,) or by equal signs ( = ). The directives are free 
form and blanks are permitted between the individual 
character strings of the directives, i.e., before or after 
commas (or equal signs). Although not required, a period 
(.) is a line terminator. Comments can be inserted after the 
period. 
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The general form of a load module generator directive is 

n*n*,p(l).p(2),....p(n) 
where 

name is one of the directive names given above 

each p(n) is a parameter required by the 
(if any) directive and defined below 

under the descriptions of the 

individual directives 

Numerical data can be octal or decimal. Each octal number 
has a leading zero. 

For greater clarity in the descriptions of the directives, 
optional periods, optional blank separators between 
character strings, and the optional replacement of commas 
(,) by equal signs ( - ) are omitted. 

Error messages applicable to load module generator direc- 
tives are given in Appendix A.6. 

6.2.1 TIOB (Task-Identification Block) 
Directive 

This directive must be input before any other LMGEN 
directives can be accepted. It permits task scheduling and 
execution, and specifies the overlay and debugging charac- 
teristics of the task. The directive has the general form 



TIDB,name,type, segments, DEBUG, ropages 



where 



name is the name ( 1 to 6 ASCII characters) of 

the task 

type is 1 for an unprotected background task 

on BL, or 2 for a protected foreground 
task or 3 for a background task on an 
alternate library 

segments is the number (2 to 9999) of overlay 
segments in a task with overlays, or for 
a task without overlays (note that the 
number 1 is invalid) 

DEBUG is present when debugging is desired 

ropages is an optional ready-only page specifier 

(1 77). It can be a single number or a 
range of consecutive numbers (e.g., 3,5). 

The DEBUG parameter includes the DEBUG object module 
as part ol the task. H the task is a load module without 
overlays, DEBUG is the last object module loaded. If the 
task is a load module with overlays, DEBUG is the last 
object module loaded in the root segment (section 6.1.1). 

The ropage parameter allows specification of a range of 
virtual pages as read-only. 



Examples: Specify an unprotected background tas*-: 
named DUMP as having no overlays but with debugging 
capability. 

TIDB.DUMP, 1,0, DEBUG 

Specify a protected foreground task named PROC a? 
having a root segment and four overlay segments. 

TIDB, PROC, 2,4 



6.2.2 LO (Load) Directive 

This directive specifies the logical unit from which retocat 
able object modules are to be loaded. !t has the general 
form 

LD,tun,key,f7/e 
for loading from RMD logical units, and 
LD.lun 

for loading from any other logical unit, where 



lun 



key 



file 



is the name or number of the logical 
where the object module resides 

is the protection code required to 
address lun 

is the name of the RMD file 



From the object modules, LMGEN generates toad modules 
(with or without overlays) on the SW logical unit. Loading of 
object modules from the specified logical unit continues 
until an end of-file mark or an end -of load module record 
(appendix G.6) is encountered. 

Successive LD directives permit the loading of object 
modules that reside on different logical units. The execu- 
tion address for the load module is the last encounter 
execution address. 

Examples: Load the relocatable object modules from 
logical unit 6 (Bl) until an endoffile mark is encountered 

LD, 6 

Open a file named DUMP on logical unit 9 (GO) with n> 
protection code. (LMGEN loads the relocatable object 
modules and closes the file.) 

LD,9 r .DUMP 



6.2.3 OV (Overlay) Directive 

This directive specifies that the named segment is an 
overlay segment. It has the general form 



OV.tegname 
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where segname is the name (1 to 6 ASCII characters) of 
the overlay segment. 

Example: Specify SINE as an overlay segment. 

OV,SINE 



6.2.4 US (Library) Directive 

This directive indicates that all load (LD, section 6.2.2) 
directives have been input, i.e., all object modules have 
been loaded except those required to satisfy undefined 
externals. UB also specifies the libraries to be searched 
(and the order in which the search is made) to satisfy alt 
undefined externals. The directive has the general form 

LIB, iun( I ),*cey(i ).lun(2),key(2), . .. Jun(n),k*y(n) 



where 



each iun(n) is the name or number of a resident 
library RMD logical unit to be searched 



each key(n) is the protection code required to 
address the preceding logical unit 



The search is conducted in the order in which the logical 
units are given in the LIB directive. When not specified by 
LIB, the coreresident (CL) and object-module (OM) 
libraries are searched after all specified libraries have been 
searched. However, if LIB specifies the CL and/or OM 
libraries, they are searched in the order given in LIB. 

If the generation of the load module involves overlays, a LIB 
directive follows each overlay generation. 



Examples: Specify to the LMGEN a sequence of libraries 
to be searched to satisfy undefined externals. Use logical 
unit 115, a user library, having protection code M; followed 
by logical unit 103, the CL library, having protection code 
C; and the OM library, having protection code D. (Because 
the last two libraries are searched in any case, note that 
the two inputs following are equivalent.) Input 

LIB, 1 15, M, 103, C, 104, D 

or, more briefly, 

LIB, 115, M 

To change the order of search to logical units 104, 115, and 
103, input 

LIB, 104, D, 115, K, 103,C 



To search only the CL and OM libraries to satisfy undefined 
externals, input 



LIB 



6.2.5 END Directive 

This directive terminates the generation of the load module 
and, if specified, causes the creation of a file and a 
directory entry (section 9) for the load module contents on 
the indicated logical unit. The indicated logical unit, if any, 
is an RMD, and thus may require a protection code. The 
directive has the general form 



tm.lun.key 



where 



lun is the name or number of the logical unit 

on which the file containing the load 
module will reside 

key is the protection code, if any, required to 

address lun 

If TIDB (section 6.2.1) specified an unprotected back- 
ground task (TIDB directive type = 1), the logical unit, if 
any, specified by the END directive must be that of the BL 
unit, i.e., unit 105. If TIDB specified a protected foreground 
task (TIDB directive type «■ 2), the logical unit, if any, 
specified by the END directive must be that of the FL unit, 
i.e., unit 106, or that of any available assigned RMD 
partition. If TIDB specified an alternate library background 
task (TIDB directive type « 3), the logical unit, if any, 
specified by the END directive, may be that of any available 
assigned RMD partition. 

If the END directive does not specify a logical unit, the load 
module resides on the SW logical unit only. 

If there are still undefined externals, the load module is not 
cataloged even if END specifies a legal logical unit. In this 
case, the load module resides on the SW unit only. 

Examples: Specify that the load module is complete (no 
more inputs to be made), create a file and a directory entry 
on the BL logical unit (105), and catalog the module. The 
protection code is E. (Note: The load module will also 
reside on the SW unit.) 

END, 105,E 

Specify that the load module is complete (no more inputs to 
be made) and is to reside on the SW unit only. 



END 



6.2.6 CLD Directive 



or, more briefly, 
LIB, 104,0, 115, M 



This directive specifies the logical unit from which relocat 
able object modules are to be loaded. It has the general 
forms 
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CLD,hm,key, file 



or 



CLO.lun 

Where use of the two forms and the meaning of lun, key, 
and file is as for the ID directive (section 6.22) This 
directive specifics the same action as for the LD directive 
except that successive CLD directives do not cause re 
opening or repositioning of the specified logical unit. 



Example 2: Card Input 

Generate a foreground task with overlays using LMGEN 
with control records and object modules input from the 
card reader. Assign the Bl and SI logical units to card 
reader unit CROO. Assign the task name EXC5, overlay 
names SGML SGM2. and SGM3. and catalog to the FL 
logical unit. 

/JOB, EXAMPLES 

/ASSIGN, BI»CR00 , SI-CROO 



6.2.7 MEM (Memory) Directive 

Thts optional directive is used to specify the default 
number of extra memory blocks to be attached to a 
background task in a similar manner to the /MEM 
directive of JCP. This value is in addition to a /MEM 
request and is stored in word 12 of the task's pseudo TIDB. 
The directive has the general form 



MEM.n 



where 



n is the number of 512 word blocks 

(pages) 

This directive, if used, must appear after the last LIB 
directive and before the END directive. 



6.3 SAMPLE DECKS FOR LMGEN 
OPERATIONS 

Example 1: Card and Teletype Input 

Generate a background task without overlays using LMGEN 
with control records input from the Teletype and object 
modute(s) on cards Assign the Bf logical unit to card 
reader unit CROO. Assign the task name EXC4 and catalog 
to the BL logical unit, and load DEBUG as part of the task 
from the OM library. 



(Teletype input) 



/JOB, EXAMPLE* 

/ASSIGN, BI-CROO 

/LMGEN 

TIDB,EXCH, 1 r 0, DEBUG 

LD.BI 

LIB 

END,BL,B 

/ENDJOB 



Note: The object module deck must be followed by an 
end of file (2789 in card column 1 ). 



(Deck) 

• 

/LMGEN 

TIDB,EXC5,2, 3 

LD,BI 

(Object Modules) - root segment) 

(End of File) 
LIB 

OV,SGM1 
LD,BI 
(Object Module(s)) 

(End of File) 
LIB 

OV,SGM2 
LD, BI 
(Object Modules)) 

(End of File) 
LIB 

OV,SGM3 
LD.BI 
(Object Modu4e(s)) 

(End of File) 
LIB 

END,FL,F 
/ENDJOB 



Example 3: Teletype and RMD Input 

Generate a foreground task without overlays using LMGEN 
with control records input from the Teletype and object 
modules) from an RMD. The object module resides on 
RMD 107 under the name PGEX. Assign the task name 
EXC6. search the OM library first to satisfy any undefined 
externals, and catalog on RMD 120. 

/JOB, EXAMPLES 

/LMGEN 

TIDB, EXC6, 2,0 

LD, 10 7,2, PGEX 

LIB,OM,D 

END, 120, X 

/ENDJOB 
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SECTION 7 
DEBUGGING AIDS 



The VORTEX It system contains two debugging aids; the 
debugging program (DEBUG) and the snapshot dump 
program (SNAP). 



7.1 DEBUGGING PROGRAM 

The 816 word VORTEX debugging program (DEBUG) is 
added to a task toad module whenever the DEBUG option 
is specified by a load-module generator TfDB directive 
(section 6 2.1). The DEBUG object module is the fait object 
module loaded of the root segment if the task is an overlay 
load module. The load -module generator sets the load- 
module execution address equal to that of DEBUG. 

If the load module has been cataloged, DEBUG executes 
when the module is scheduled. Otherwise, JCP directive 
/EXEC (section 4.2.22) is used to schedule the module and 
DEBUG (level zero only). 



During the execution of DEBUG, the A, B, and X 
pseudoregisters save the contents of the real A, B, and X 
registers, and restore the contents of these registers before 
terminating DEBUG. If the task uses V75 registers, the 
contents of R3 through R7 are also saved and restored 



When debugging is complete, the input of any job-control 
directive (section 4.2) returns control to the VORTEX 
system. 



INPUTS to DEBUG comprise the directives summarized in 
table 7-1 input through the Dl logical unit When DEBUG is 
first entered, it outputs on the Teletype or CRT device the 
message OG** followed by the TiDB task name and the, 
address of the first allocatable memory celt. This message 
indicates that the system is ready to accept DEBUG 
directives on the Dl unit. 



Directive 

A 

Ax 

B 

Bx 

*Rn 

*Rnx 

Cx 
Gx 

lx,y t z 

O 

P 

Sx,y,z,m 

Ty.x 



Table 7-1. DEBUG Directives 
Description 

Display and change the contents of the A pseudoregister 

Change, but do not display, the contents of the A pseudoregister 

Display and change the contents of the B pseudoregister 

Change, but do not display, the contents of the B pseudoregister 

Display and change the contents of the V75 register 
n (n - 0-7). 

Change, but do not display, the contents of the V75 
register n. 

Display and change the contents of memory address x 

Load the contents of the pseudoregisters into the 
respective A, B, and X registers, and transfer to 
memory address x 

Initialize memory addresses x through y with the value of z 

Display and change the overflow indicator 

Read DEBUG directives from Bl unit until EOF 

Search memory addresses x through y for the z value, 
using mask m 

Place a trap at memory address y, starting execution 
at address x 
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Directive 
Ty 

X 

Xy 

XXXXXX 

xxxxxx,yyyyyy 



Table 7 1. DEBUG Directives (continued) 
Description 

Place a trap at memory address y, starting execution 
at the last trap location 

Display and change the contents of the X pseudoregister 

Change, but do not display, the contents of the X 
pseudoregister 

Display the contents of memory address xxxxxx 

Display the contents of memory addresses xxxxxx through 

yyyyyy 



* * V75 systems only 



Each DEBUG directive has from to 72 characters and is 
terminated by a carriage return. Directive parameters are 
separated by commas, but DEBUG treats commas, periods, 
and equal signs as delimiters. 

Numerical data are always interpreted as octal by DEBUG. 
Negative numbers are accepted, but they are converted to 
their twos complements by DEBUG. 

An error message, EX20EX25, is output and the task is 
aborted, if a memory map protection violation occurs. 

OUTPUTS from DEBUG consist of corrections to registers 
and memory, displays, listings on the DO logical unit, and 
error messages. Numerical data are always to be inter- 
preted as octal. 

Error messages applicable to the debugging program are 
given in Appendix A. 7. 



Example* of DEBUG directive usage: Note that, in the 
following examples, operator inputs are in bold type. 
Entries in italics, are program responses to the directives. 

Display the contents of a pseudoregister A: 

A 

(001200) 

Display and change the contents of a pseudoregister B: 

B 

(001200) 010406 

Change, but do not display, the contents of a pseudoregis 

ter X: 

X02050 



Display, but do not change, the status of the overflow 
indicator: 

O 

(000001) 

Display and change the status of the overflow indicator 



(000000) 000001 

Display, but do not change, the contents of memory 
address 002050: 

CQQ2050 

(10240 J J 

Display and change the contents of memory address 
002050: 

C002050 

(JG240J) 
001234 



Display and change the contents of memory address 
002050, than display the contents of ths next sequential 
location: 

C002050 

(10240J) 
001234, 

(000067) 

Display, but do not change, the contents of memory 
address 002050, then display the contents of the next 
location: 

C0Q2050 

(102401), 
(000067) 
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Load the contents of the pseudoregisters into the respective 
A, B, and X register*, and start execution at memory 
address 001001: 

G001001 

Initialize memory addresses 000200 through 000210 to the 
value 077777: 

1000200,000210.077777 

Search memory addresses 000200 through 000240 for the 
value 000110 using the mask 000770, and display 
addresses that compare: 

S000200,000240 t 0001 10,000770 

000220 (017110) 
000234 (000110) 
000237 (001 110) 

Load the contents of the pseudoregisters and the overflow 
indicator status into the respective registers, and start 
execution at memory address 001234, specifying a trap 
address of 001236. Display the contents of the A, B, and X 
registers and the setting of the overflow indicator when the 
trap address is encountered. 

T001236,001234 

001236 042340) 002000 010405 012345 OOOOOl 

Execute the same trap it the task uses V75 instructions 
(assuming Rn * n): 

T001236.001234 

00J236 (J42340) 002000 010405 012345 OOOOOl 

000003 000004 000005 000006 000007 

Display the contents of memory address 001234: 



module if the task contains a SNAP request and calls the 
SNAP external routine. SNAP is entered directly upon 
execution of the SNAP display request CALL SNAP. The 
SNAP display request is an integral part of the task and is 
assembled with the task directives. Thus, no external 
intervention is required to output a SNAP display. 

SNAP outputs the message SN** followed by the task TIDB 
name before listing the requested items. The calling 
sequence for a SNAP display ts 



EXT 


SNAP 


CALL 


SNAP 


DATA 


start 


DATA 


end 


DATA 


ttdb 



where 



start 



end 



tide 



is the first address whose contents are 
to be displayed 

is the last address whose contents are to 
be displayed 

is less than zero if dump of task TIDB is 
desired, ts positive if TIDB dump is to be 
suppressed 



If start is a negative number, there is no memory dump. If 
more than one location is specified to be displayed, the 
output dump will be in complete lines of eight addresses, 
e.g., if start is 01231 and end is 01236, the dump will 
display the contents of addresses 01230 through 01237, 
inclusive. SNAP displays octal data. 



001234 

(001200) 

Display the contents of memory addresses 001234 through 
001237: 



001234,001237 
001230 005000 



005000 



Total of 8 values 



7.2 SNAPSHOT DUMP PROGRAM 



If there is an error in the SNAP display request, only the 
contents of the A, B, and X (and V75 if present) registers 
and the setting of the overflow indicator are displayed. 



Output examples: with the snap request at 01234, display 
the contents of the A (017770), B (001244), and X 
(037576) registers, and the overflow indicator (on). 

SN** TASK01 

001234 017770 00124a 037576 000001 
♦000003 000004 000005 000006 000007 



The 294-word snapshot dump program (SNAP) provides on 
the DO logical unit both register displays and the contents 
of specified areas of memory. It is added to a task load 



Using the same data, display, in addition, the contents of 
memory addresses 001002 through 001025, inclusive and 
request a dump of the active TIDB. 
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SN** SW 000500 

001023 000000 000000 001023 000000 
•000003 000004 000005 000006 000007 



TIDB LOC 05 5013 -CONT1KTS- 



055010 
055020 
055030 
055040 
♦055050 



000000 
001527 
000001 
000500 
000006 



000000 
067001 
001541 
000000 
000007 



000000 
001326 
000002 
074627 
000000 



000000 
141 146 
000000 
064604 
000000 



000001 
001000 
002000 
055075 
000000 



000000 
065604 
151727 
000003 
000000 



000000 
000007 
120240 
000004 
000000 



001527 
001302 
120240 
000005 
000000 



SNAP DUMP 

001000 006505 070275 001402 001031 000050 006505 066270 100000 

001010 010002 N 075334 000000 000000 006505 070137 001005 001101 

001020 001101 001101 001014 002000 001107 001000 001027 001000 

These lines appear only if the task uses V75 register 
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SECTION 8 
SOURCE EDITOR 



The VORTEX operating system source editor (SEDIT) is a 
background task that constructs sequenced or listed output 
files by selectively copying sequences of records from one or 
more input files. SEDIT operates on the principle of 
forward-merging of subfiles and has file-positioning capa 
biiiiy. The output file can be sequenced and /or listed. 



8.1 ORGANIZATION 

SEDIT is scheduled by the job-control processor (JCP, 
section 4 2.17) upon input of the JCP directive /SEDIT. 
Once activated. SEDIT inputs and executes directives from 
the SI logical unit until another JCP directive (first 
character - /) is input, at which time SEDIT terminates 
and the JCP is again scheduled. 

SEDIT has a buffer area for 100 source records in MOVE 
operations (section 8.2,8). To increase this, input a /MEM 
directive (section 4.2.5). immediately preceding the /SEDIT 
directive, where each 512-word block will increase the 
capacity of the buffer area by 12 source records, 

INPUTS to SEDIT comprise: 

a. Source-editor directives (section 8.2) input through the 
SI logical unit. 

b. Old source records input through the IN logical unit 

c. New or replacement source records input through the 
ALT logical unit. 

d. Error-recovery inputs entered via the SO logical unit. 

Source-editor directives specify both the changes to be 
made in the source records, and the logical units to be 
used in making these changes. The directives are input 
through the SI logical unit and listed as read on the LO 
logical unit, with the VORTEX standard heading at the top 
of each page. If the SI logical unit is a Teletype or a CRT 
device, the message $E** is output to it before directive 
input to indicate that the SI unit is waiting for SEDIT input. 

There are two groups of source-editor directives: the 
copying group and the auxiliary group. The copying group 
directives copy or delete source records input on the IN 
logical unit, merge them with new or replacement source 
records input on the ALT unit, and output the results on 
the OUT unit. Copying-group directives must appear in 
sequence according to their positioning-record number 
since there is no reverse positioning. If the remainder of 
the source records on the IN unit are to be copied after alt 
editing is completed, this must be explicitly stated by an FC 
directive, (section 8.2.9). Ends of file are output only when 
specified by FC or WE directives (sections 8.2.9 and 
8.2.13). The processing of string-editing directives is 



different from that of record editing directives. A string 
editing directive affects a specified record, where source 
records on the IN unit are copied onto the OUT unit until 
the specified record is found and read into memory from 
the IN unH. After editing, this record remains in memory 
and is not yet copied onto the OUT unit. This makes 
possible multiple field-editing operations on a single source 
record. The auxiliary group directives are those used for 
special I/O or control functions. 

AH source records, whether old, new, or replacement 
records, are arranged in blocks of three 40-word records 
per VORTEX RMD physical record Any unused portion of 
the last physical record of an RMD file on the IN unit 
should be padded with blanks. When necessary, SEDIT will 
pad the last RMD record on the OUT unit. When the OUT 
file will contain more than one source module for input to a 
language processor, the user should insert two blank 
records after each END statement to insure that each 
source module starts on a physical record boundary 
Record numbers start with 1 and have a maximum of 9999 
Sequence numbers start at any value less than the 
maximum 9999, and can be increased by any integral 
increment. These specifications for sequence numbers are 
given by the SE directive (section 8.2. 10). 

Error-recovery Inputs are entered by the operator on the 
SO logical unit to recover from errors in SEDIT operations 
Error messages applicable to this component are given in 
Appendix A.8. Recovery is by either of the following: 

a. Input the character C on the SO unit, thus directing 
SEDIT to go to the SI unit for the next directive 

b. Input the corrected directive on the SO unit for 
processing. The next SEDIT directive is then input from 
the SI unit. 

If recovery is not desired, input a JCP directive (section 
4 2) on the SO unit to abort the SEDIT task and schedule 
the JCP for execution. (Note: If there is an I/O control 
error on the SO unit, SEDIT is terminated automatically.) 

OUTPUTS from the SEDIT comprise: 

a. Edited source-record sequences output on the OUT 
logical unit. 

b. Error messages. 

c. The listing of the SEDIT directives on the LO logical unit 

d. Comparison outputs (compare- inputs directive, section 
8.2.15). 

e. Listing of source records on the LO logical unit when 
specified by the LI directive (section 8.2. 1 1 ). 
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Error messages applicable to SEDIT are output on the SO 
and 10 tog rcal units. The individual messages and errors 
are given in Appendix A.8 

The listing of the $£01 T directives is made as the 
directives are read. Source records, when listed, are listed 
as they are input or outpu*. The VORTEX standard heading 
appears at the top of each page of the listing. 

LOGICAL UNITS referenced by SEDIT are either fixed or 
reassignable units. The three fixed logical units are: 

a. The $1 logical unit, which is the normal input unit for 
SEOIT directives. 

b The SO logical unit, which is used for error processing 

c The LO logical unit, which is the output unit for SEDIT 
listings. 



SEDIT directives begin in column 1 and comprise se 
quences of character strings having no embedded blanks 
The character strings are separated by commas (,) or by 
equal signs ( * ). The directives are free-form and blanks 
are permitted between individual character strings of the 
directive, i.e., before or after commas (or equal signs) 
Although not required, a period (.) is a line terminator 
Comments can be inserted after the period. 

The general form of an SEOIT directive is 

name,p(i ),p(2),...,p(n) 



where 



name is one of the directive names given above 

or a longer string beginning with one of 
the directives names (e.g., AS or 
ASSIGN) 



The three reassignable logical units are: 

a The SEDIT input (IN) logical unit, which is the normal 
input unit for source records. This is assigned to the PI 
logical unit when SEDIT is loaded, but the a$^gnment 
can be changed by an AS directive with an IN 
parameter (section 8 2 1). 

b The SEDIT output (OUT) logical unit, which is the 
normal output unit for source records. This is assigned 
to the PO logical unit when SEDIT is loaded, but the 
assignment can be changed by an AS directive with 
an OU parameter. 

c The SEDIT alternate input (ALT) logical unit, which is 
the alternate input unit used for new or replacement 
source records This is assigned to the Bl logical unit 
when SEDIT is loaded, but the assignment can be 
changed by an AS directive with an AL parameter. 



8.2 SOURCE-EDITOR DIRECTIVES 

This section describes the SEDIT directives: 



Copying group: 






AS 


Assign logical units 




AD 


Add record(s) 




SA 


Add string 




REPL 


Replace recoro\s) 




$R 


Replace string 




DE 


Delete record(s) 




SO 


Delete string 


MO 


Move record(s) 


Auxiliary group: 






FC 


Copy file 




SE 


Sequence records 




LI 


List records 




GA 


Gang-load all records 




WE 


Write end-of-file 




REWI 


Rewind 




CO 


Compare records 



each p(n) is a parameter defined below under the 
descriptions of the individual directives 

Where applicable in the following descriptions, a field 
specification of the format (first,last) or (nl,n2,n3> is still 
separated from other parameters by parentheses even 
though it is enclosed in commas. Note also that the 
character string string is coded within single quotation 
marks, which are, of course, neither a part of the string 
itself nor of the character count for the string. 



8.2.1 AS (Assign Logical Units) Directive 

This directive specifies a unit assignment for an SEDIT 
reassignable logical unit (section 8.1). It has the general 
form 

AS,nn»lun, key, file 



where 



tun 



key 



We 



is IN if the directive is making an 
assignment of the IN logical unit, OU if 
the OUT logical unit, or AL ff the ALT 
logical unit 



is the name or number of the logical unit 
being assigned as the IN, OUT, or ALT 
unit 



is the protection code, if any, required to 
address km 



is the name of an RMD lite, if required 



If the SEDIT reassignable units are to retain the assign 
ments made when SEDIT was loaded (default 
assignments: IN - PI, OUT - PO, ALT - 81), no AS d.rec 
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five is required. Each AS directive can make only one 
reassignment (e.g., if both IN and OUT are to be 
reassigned, two AS directives are required). 

Any RMD affected by an AS directive is automatically 
repositioned to beginning of device 

The AS directive merely fixes parameters in I/O control 
calls within SED1T. It does not alter I/O control assign 
ments in the logical-unit table (table 3 1) 

Note: AS resets the corresponding record counter; how 
ever, no physical rewinding of devices occurs. 



Examples: Assign the PI logical unit as the SEDIT 
reassignable IN unit. 

AS, IN-PI 

or, the unabbreviated form 

ASSIGN, INPUT-PI 

Assign logical unit 8 as the SEDIT reassignable OUT unit. 

AS,OU«8 

Assign as the SEDIT reassignable IN unit the file FILEX on 
logical unit 111, an RMD partition without a protection key. 

AS.IN-1 11 , , FILEX 



8.2.2 AD (Add Records) Directive 

This directive adds source records. It has the general form 
AD.recno 



where recno is the number of the record last copied from 
the IN logical unit before switching to the ALT unit for 
further copying. 



The AD directive copies source records from the IN logical 
unit onto the OUT logical unit beginning with the current 
position of the IN unit and continuing up to and including 
the record specified by recno. Then, source records are 
copied from ALT onto OUT from the current position of the 
unit up to but not including the next end-offile mark. 

Example: Copy records from IN onto OUT from the 
current position of IN up to and including IN record 7. 
Then, switch to ALT and copy records from the current 
position of that unit up to but not including the next end 
of-file mark. 

AD # 7 



8.2.3 SA (Add String) Directive 

This directive inserts a character string into a source-record 
field. It has the general form 



SA,recno,(first,last),' string' 



where 



recno is the number of the source record in 

which the character string is to be 
inserted 



first is the number of the first character 

position to be affected 



last is the number of the last character 

position to be affected 



string is the string of characters to be inserted 

in the field delimited by character 
positions first and last in record number 
recno 

The SA directive copies source records from the IN logical 
unit onto the OUT logical unit beginning with the current 
position of the IN unit and continuing up to but not 
including the record specified by recno. The record recno is 
read into the memory buffer. The character string string 
shifts into the left end of the specified field first.last with 
characters shifted out of the right end of the field being 
lost. There is no check on the length of string and shifting 
continues until it is left justified in the field with excess 
characters, if any, being truncated on the right. 

The record remains in the memory buffer, thus permitting 
multiple string operations on the same record. (If IN is 
already positioned at recno because of a previous string 
operation, there is, of course, no change in position ) 

The record recno is read out of the memory buffer and onto 
the OUT unit when an SEDIT directive affecting another 
record is input. 

The field specification first.last is lost after one mampufa 
tion. Subsequent string operations must specify the 
character positions based on the new configuration For 
example, tor the character string ACDEGbb in positions I 
through 7, addition of the character B in position 2 requires 
the field specification (2,7). Then, to add the character F 
between E and G, one must specify the field (6,7) rather 
than (5,7) because of the shift previously caused by 
insertion of the character B. 

Example: Change the erroneous DAS MR source state 
ment operand in character positions 16 21 of the 32nd 
record from LOCXbb to LOC.Xb 

SA,32, (19,20) 
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8.2.4 REPL (Replace Records) Directive 

This directive replaces one sequence of source records with 
another sequence of records. It has the general form 



REPL, recnol , recno2 



where 



recnol 



recno2 



is the number of the first record to be 
replaced 



is the number of the last record to be 
replaced 



if recno2 is omitted, it is assumed equal to recnol, i.e. 
record will be replaced. 



one 



The REPL directive copies source records from the IN 
logical unit onto the OUT logical unit beginning with the 
current position of the IN unit and continuing up to but not 
including the record specified by recnol. Then, records are 
read from IN, but not copied onto OUT, up to and including 
the record specified by recno2. Thus, the records recnol 
through recno2, inclusive, are deleted. Then, source records 
are copied from the ALT logical unit from the current 
position of the unit up to but not including the next end of 
file mark. 



Example: Copy records from IN onto OUT from the 
current position of IN up to and including record 9. Replace 
IN records 10 through 20, inclusive, with records on ALT, 
copying those between the current position of ALT and the 
next end of file mark onto OUT. Do not copy the end -of file 
mark 

RBPL r 10,20 



8.2.5 SR (Replace String) Directive 

This directive replaces one character string within a source 
record with another character string. It has the general 

form 



SR.recnoXnl^.rvSX'strlng' 



where 



"3 is the number of the last character 

position of the field in which the string to 
be replaced occurs 

string is the string of characters to be inserted 

in the field delimited by character 
positions nl and n3 in record number 
recno after shifting out the characters in 
positions nl through n2, inclusive 

The SR directive copies source records from the IN logical 
unit onto the OUT logical unit beginning with the current 
position of the IN unit and continuing up to but not 
including the record specified by recno. The record recno is 
read into the memory buffer. Field nl f n3 is then shifted to 
the left and filled with blanks until the field nl,n2 is shifted 
out. Then, the character string string shifts into the left 
end of the field nl,n3. There is no check on the length of 
string and shifting continues until it is left-justified in the 
field nl,n3 with excess characters, if any, being truncated 
on the right. 

The record remains in the memory buffer, thus permittmg 
multiple string operations on the same record. (If IN is 
already positioned at recno because of a previous string 
operation, there is, of course, no change in position.) 

The record recno is read out of the memory buffer and onto 
the OUT unit when a SEDIT directive affecting another 
record is input. 

The field specification nl,n2,n3 is lost after one manipula 
tion. Subsequent string operations must specify the 
character positions based on the new configuration. 



Example: Copy records from IN onto OUT up to and 
including record 49, and replace the present contents of 
character positions 10 through 12, inclusive, in IN unit 
source record 50 with the character string XYb. 

SR, 50,(10, 12,12), *XY ' 



8.2.6 DE (Delete Records) Directive 

This directive deletes a sequence of source records. It has 
the general form 

DC.recnol,recno2 



recno is the number of the source record in 

which the character string is to be 
replaced 



recnol 



is the number of the first record to be 
deleted 



nl is the number of the first character 

position of the string to be replaced 



r«cna2 Is the number of the last record to be 

deleted 



n2 is the number of the last character 

position of the string to be replaced 



If mcno2 is omitted, it is assumed equal to recnol, i.e., one 
record will be deleted. 
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The DE directive processing is exactly like that of the REPL 
directive (section 8.2.4) except that there is no copying 
from the ALT unit after the deletion of the records recnol 
through recnoZ inclusive. 



Examples: Copy records from IN onto the OUT logical unit 
up to and including record 49, but delete records 50 
through 54, inclusive. 



DE,50,54 

Position IN at record 2. deleting record 1. 

DB, 1 

8.2.7 SO (Delate String) Directive 

This directive deletes a character string from a source 
record. It has the general form 

SO,recno,(nl,n2,n3) 

where 

recno is the number of the source record from 

which the character string is to be 
deleted 



nl 



n2 



n3 



is the number of the first character 
position of the string to be deleted 



is the number of the last character 
position of the string to be deleted 



is the number of the last character 
position of the field in which the string to 
be deleted occurs 



The SD directive processing is exactly like that of the SR 
directive (section 8.2.5) except that no new character string 
is shifted into field n2,n3 after the field nl,n2 is shifted out. 



Example: Copy records from IN onto OUT up to and 
including record 99, and delete characters 2 through 4, 
inclusive, from record 100, shifting characters 5 through 
10, inclusive, three places to the left, with blank fill on the 
right. 



8.2.8 MO (Move Records) Directive 

This directive moves a block of records forward on a unit. It 
has the general form 

MO,recno I , recno2,recno3 



where 



SO, 100, (2,4, 10) 



recnol is the number ol the first record to be 

moved 



recno2 is the number of the last record to be 

moved 



recno 3 is the number of the record after which 

the block of records delimited by recnol 
and recno2 is to be inserted 

If recno2 is omitted, it is assumed equal to recnol, i.e., one 
record will be moved. 

The MO directive copies source records from the IN logical 
unit onto the OUT logical unit beginning with the current 
position of the IN unit and continuing up to but not 
including the record specified by recnol The records 
recnol through recno2 are then read into a special MOVE 
area in memory. The position of IN is now recno2+l. 
When OUT reaches (by some succeeding directive) 
recno3 + 1, the contents of the MOVE area are copied onto 
OUT. Multiple MO operations are legal. 

Example: Copy records from IN onto OUT up to and 
including record 4, save records 5 through 10, inclusive, in 
the MOVE area of memory, copy records 11 through 99, 
inclusive, from IN onto OUT, and then copy records 5 
through 10 from the MOVE area to OUT. This gives a record 
sequence on OUT of 1-4, 11-99. 5 10 (FC directive, section 
8.2.9). 

MO, 5, 10,99 
PC 



8.2.9 FC (Copy File) Directive 

This directive copies blocks of files, including end-of-file 
marks. It has the general form 

FC,nf)7es 

where nfilm (default value -= 1) is the number of files to be 
copied. 



If the IN logical unit and /or the OUT logical unit is an RMD 
partition, n/Hes must be 1 or absent. If OUT is a named file 
on an RMD, there will be an automatic close/update 
Whenever an end-of-file mark is encountered, ail record 
counters are reset to zero. 
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Examples: Copy files from IN onto OUT up to and 
including the next end of file mark on the IN unit. 



FC 



Copy the next six IN files (including end of file marks) onto 
OUT This includes the sixth end of file mark. (Note: If IN 
and/or OUT is an RMD partition, there will be an error.) 

FC,6 



8.2.10 SE (Sequence Records) Directive 



This directive assigns a decimal sequence number to each 
source record output to the OUT logical unit. It has the 

general form 



SE. (first last), initial, increment 



8.2.11 LI (List Records) Directive 

This directive lists, on the LO logical unit, the records 
copied onto the OUT unit The LI directive has the genera! 
form 

Wist 

where list is A (default value) if alt OUT records are to be 
listed, C If only changed records are to be listed, or N if 
listing is to be suppressed. Source records output to the 
OUT file are listed with their OUT record number at the left 
of the print list. 

Examples: List all records output to OUT. 

LI 

Suppress all listing except that of SEDIT directives 

LI,N 



where 



first 



last 



is the first character position of the 
sequence name field 

is the last character position of the 
sequence number field, where the de- 
fault value of ftrst.last is 76,80 



8.2.12 GA (Gang-Load AM Records) Directive 

This directive loads the same character string into the 
specified field of every record copied onto the OUT logical 
unit It has the general form 



initial is the initial number to be used as a 

sequence number (default value - 10) 

increment is the increment to be used between 
successive sequence numbers (default 
value - 10) 



There is also a special form of the SE directive to stop 
sequencing: 

SE.N 

where there are no parameters other than the letter N. 



GA. (first, last): string' 



where 
first 

last 
string 



is the first character position of the field 
to be gang-loaded 

is the last character position of the field 
to be gang-loaded, where the default value 
of firstjast is 73,75 

is the string of characters to be gang 
loaded into character positions first 
through last, inclusive in all records 
copied onto out 



Examples: In the next record output to OUT, place 00010 
in character positions 76 through 80, and increment the 
field by 10 in each succeeding record. 

SB 

In the next record output to OUT, place 030 in character 
positions 15 through 17, and increment the field by 7 on 
each succeeding record. 

SE,( 15, 17) ,30,7 

Stop sequencing. 

SE.N 



There is also a special form of the GA directive to stop 
gang loading: 



GA 



where there are no parameters in the directive. 

In every OUT record, GA clears the specified field, and 
loads the string into it. There is no check on the length of 
string and shifting continues until it is ?eft justified in the 
specified field with excess characters, if any, beng 
truncated on the right 
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Examples: Load character string VDMbb in character 
positions 11 through 15, inclusive, of every record copied 
onto OUT. 

GA, ( 11, 15), 'VDM ' 
Stop gang loading. 

GA 



8.2.13 WE (Write End of File) 
Directive 



This directive writes an end of-file mark on the OUT logical 
unit. It has the form 



WE 



without parameters. If OUT is a named file on an RMD, 
there will be an automatic close/update. 



Example: Write an end of file mark on OUT, a magnetic 
tape unit. 



WE 



limit is the maximum number of 

discrepancies to be listed before 
aborting the comparison and passing to 
the next directive. 



Any discrepancy between the IN and ALT inputs is listed in 
the format 

I recordnurober or EOF inrecord 
A recordnumber or EOF altrecord 

If the comparison terminates by reaching the limit number 
of discrepancies, SEDIT outputs on the LO the message 

SEDIT COMPARE ABORTED 

to prevent long listings of errors, for example, where a card 
is misplaced or missing on one input A normal termination 
of a comparison (at the next end-of-file mark) concludes 
with the message 

SEDIT COMPARE FINISHED 

Example: Compare character positions 1 through 80, 
inclusive, from the IN and ALT units until either an end of 
file is found or there have been 5 discrepancies listed on 
the LO. 



8.2.14 REWI (Rewind) Directive 

This directive rewinds the specified SEDIT logical unit(s) It 
has the general form 



REWI,p(l),p(2),p(3) 

where each p(n) is a name of one of the SEDIT logical 
units: IN, OUT, or ALT. These can be coded in any order. 



Example: Rewind all SEDIT logical units. 
REWI, IN, ALT, OUT 



8.3 EXAMPLE OF EDITING A FILE 



Following is a sample job stream for editing an existing file 
on a magnetic tape onto a new file on magnetic tape The 
input file consists of 80 character records followed by an 
end of-file mark. The job stream and the edit cards are 
read through the system input device. 



8.2.15 CO (Compare Inputs) Directive 

This directive compares the specified field in the inputs 
from the IN logical unit with those from the ALT logical unit 
and lists discrepancies on the LO logical unit. The directive 
has the general form 



CQ,(1int,latt),limit 



where 



first 



last 



is the first character position of the field 
to be compared 



is the last character position of the field 
to be compared, where the default value 
off/rsUasfisl.80. 



/JOB, EDIT 

/ASSIGN , PI-MTO0 , PO-MT 1 

/REW,PI,PO 

/SEDIT 

AS, IN-PI 

AS , OUT-PO 

AS, ALT-SI 

DE, 5 

REPL,8, 10 

LDA TEMP 
(EOP card, 2-7-8-9 punch) 
ADD, 17 

TBL BSS 5 
(BOr card, 2-7-8-9 punch) 
PC 

REWI, IN, OUT 
/ENDJOB 
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Th« result of running the preceding source editor example 
would be the following: 



Input FMe 



1 * 






2 * 


CATALOG 


ROUTINE 


3 * 






4 A$3 


EQU 


6 


5 B*3 


EQU 


9 


6 * 






7 CATLOG 


DATA 





8 


LDA 


TMX 


9 


LDB 


TMY 


10 


JB£M 


ODER 


1 1 


ADD 


PARM6 


12 


ANA I 


0770 


13 


STA 


TBL + 2 


1U 


LRLA 


6 


15 


STA 


TBL + 4 


16 


T2B 




17 


JMP* 


CATLOG 





Output 


File 




1 


* 






2 


* 


CATALOG 


ROUTINE 


3 


* 






4 


AS 3 


EQU 


6 


5 


* 






6 


CATLOG 


DATA 





7 




LDA 


TEMP 


8 




ADD 


PARM6 


9 




ANA I 


0770 


10 




STA 


TBL+2 


1 1 




LRLA 


6 


12 




STA 


TBL+4 


13 




TIB 




14 




JMP* 


CATLOG 


15 


TBL 


BSS 


5 
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SECTION 9 

FILE MAINTENANCE 



The VORTEX file-maintenance component (FMAIN) is a 
background task that manages filename directories and 
the space allocations of the files. It is scheduled by the job 
control processor (JCP) upon input of the JCP directive 
/FMAIN (section 4.2.18). 

Only files assigned to rota ting- memory devices (disc or 
drum) can be referenced by name. 

File space is allocated within a partition forward in 
contiguous sectors of the same cylinder, skipping bad 
tracks. The only exception to this continuity is the file-name 
directory itself, which is a sequence of linked sectors that 
may or may not be contiguous. 



9.1 ORGANIZATION 

FMAIN inputs file-maintenance directives (section 9 2) 
received on the SI logical unit and outputs them on the LO 
logical unit and on the SO logical unit if it is a different 
physical device from the LO unit. Each directive is 
completely processed before the next is input to the JCP 
buffer. 

If the SI logical unit is a Teletype or a CRT device, the 
message FW»* is output on it before input to indicate that 
the SI unit is waiting for FMAIN input. 
If there is an error, one of the error messages given in 
Appendix A.9 is output on the SO logical unit, and a record 
is input from the SO unit to the JCP buffer. If the first 
character of this record is /, FMAIN exits via the EXIT 
macro. If the first character is C, FMAIN continues. If the 
first character is neither / nor C, the record is processed as 
a normal FMAIN directive. FMAIN continues to input and 
process records until one whose first character is / is 
detected, when FMAIN exits via exit. (An entry beginning 
with a carriage return is an exception to this, being 
processed as an FMAIN directive). 

FMAIN has a symbol-table area for 200 symbols at five 
words per symbol. To increase this area, input a /MEM 
directive (section 4.2.5), where each 512 word block will 
enlarge the capacity of the table by 100 symbols. 



9.1.1 Partition Specification Table 

Each rotating memory device (RMD) is divided into up to 
20 memory areas called partitions Each partition is 



referenced by a specific logical unit number The bounda- 
ries of each partition are recorded in the core resident 
partition specification table (PST). The first word of the 
PST contains the number of VORTEX physical records per 
track. The second word of the F*ST contains the address of 
the bad-track table, if any. Subsequent words in the PST 
comprise the four-word partition entries. Each PST is in the 
format: 



Bit 



15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



Word 
Word 1 

Word 
Word 1 
Word 2 
Word 3 



Size of bad track table (120-words) 



Address of bad track table (0 if none) 
relative to word 



Beginning partition track address 



PPB Not used 



Protection code 



Number of bad tracks in partition 



Ending partition address + 1 



The partition protection bit, designated ppb in the above 
PST entry map, is unused in file maintenance procedures. 

Note that PST entries overlap. Thus, word 3 of each PST 
entry is also word of the following entry. The relative 
position of each PST entry is recorded in the device 
specification table (DST) for that partition. 

The bad-track table, whose address is in the second word 
of the PST, is a bit string read from left to right within each 
word, and forward through contiguous words, with set bits 
flagging bad tracks on the RMD. (If there is no bad-track 
table, the second word of the PST contains zero.) 

9.1.2 File-Name Directory 

Each RMD partition contains a file-name directory of the 
files contained in that partition. The beginning of the 
directory is in the first sector of the partition. The directory 
for each partition has a variable number of entries 
arranged in n sectors, 19 entries per sector. Sectors 
containing directory tnformation are chained by pointers in 
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the last word of each sector Thus, directory sectors need 
not be contiguous Each directory entry is in the format: 



Bit 


15 14 13 12 11 10 9 8 7 6 5 4 3 2 


1 


Word 
Word 1 
Word 2 
Word 3 
Word 4 
Word 5 


File name 


File name 


Ftle name 


Current position of fife 


Beginning file address 


Ending file address 



The file name comprises six ASCII characters packed two 
characters per word, (eft justified, with blank fill Word 3, 
which contains the current address at which the file is 
positioned, is initially set to the ending file address, and is 
manipulated by I/O control macros (section 3). The extent 
of the file is defined by the addresses set in words 4 and 5 
when the file is created, and remains constant. 

The first sector of each partition is assigned to the file 
name directory. FMAIN allocates RMD space forward in 
contiguous sectors, skipping bad tracks. Following the last 
entry in each directory sector is a one word tag containing 
either the value 01 (end of directory), or the address of the 
next sector of the filename directory. 

The f»le name directories are created and maintained by 
the file maintenance component for the use of the I/O 
control component (section 3). User access to the directo 
nes ts via the I/O control component. 

Special entries: A blank entry is created when a file name is 
deleted, in which case the file name is ****** and words 3 
through 5 give the extent of the blank file. A zero entry is 
created when one name of a multmame file is deleted, in 
which case the deleted name is converted to a blank entry 
and all other names of the multiname file are set to zero. 

WARNING 

To prevent possible loss of data from the file- 
name directory during file maintenance opera- 
tions. FMAIN sets the lock bit (bit 12 of word 2 
of the DST) before any directory operation, thus 
inhibiting all foreground requests for I/O with 
the partition being modified. Upon completion 
of the directory operation, FMAIN clears the lock 
bit. Except for the use of protection codes, this 
is the only protection for the file-name direc- 
tory. Manipulation of foreground files with 
FMAIN is at the user's risk. For example, 
VORTEX does not prevent deletion of a file 
name from a file name directory that has been 
opened and is being written into by a fore- 
ground program. Therefore, foreground files 
should be reassigned prior to manipulation by 
FMAIN. 



9.1.3 Relocatable Object Modules 

Outputs from both the DAS MR assembler and the 
FORTRAN compiler are in the form of relocatable object 
modules. Relocatable object modules can reside on any 
VORTEX-system logical unit. Before object modules can be 
read from a unit by the FMAIN INPUT and ADO directives 
(sections 9.2.7 and 9 28), an I/O OPEN with rewinding 
(section 3.5.1) is performed on the logical unit, i.e., the unit 
(except paper tape or card readers) is first positioned to the 
beginning of device or load point for that unit. Object 
modules can then be loaded until an endof file mark is 
found. 

The system generator (section 15) does not build any 
object-module library. FMAIN is the only VORTEX compo 
nent used for constructing user object-module libraries. 

A VORTEX physical record on an RMD is 120 words. Object 
module records are blocked two 60 word records per 
VORTEX physical record However, in the case of an RMD 
assigned as the SI logical unit, object modules are not 
blocked but assumed to be one object-module record per 
physical record. 

9.1.4 Output Listings 

FMAIN outputs four types of listing to the LO logical unit: 

• Directive listing lists, without modification, all FMAIN 
directives entered from the SI logical unit 

• Directory listing lists file names from a logical unit file 
name directory in response to the FMAIN directive LIST 
(section 9,2 5) 

• Deletion listing lists file names deleted from a logical 
unit file name directory in response to the FMAIN 
directive DELETE (section 9.2.2). 

• Object module listing lists the object module input in 
response to the FMAIN directive ADD (section 9.2.8). 

All FMAIN listings begin with the standard VORTEX 
heading. 

The directory listing is further described under the 

discussion of FMAIN directive LIST (section 9.2.5), the 

deletion fisting under DELETE (section 9.2.2), and the 
obtect module listing under ADD (section 9.2 3). 

9.2 FILE-MAINTENANCE DIRECTIVES 

This section describes the file-maintenance directives 
- CREATE file * DELETE file 

• RENAME file • ENTER new file name 

• LIST file names * INIT (initialize) directory 

• INPUT logical unit for object module 
• ADD object module 
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F lie- maintenance directives comprise sequences of charac- 
ter strings having no embedded blanks. The character 
strings are separated by commas (,) or by equal signs ( - ) 
The directives are free-form and blanks are permitted 
between the individual character strings of the directive. 
i.e., before or after commas (or equal signs). Although not 
required, a period (.) is a line terminator. Comments can 
be inserted after the period. 



Size parameters merely allocate space for the file and do 
not limit file use to the specified record size. To each record 
in the created file, FMAIN assigns n records of 120 words 
each where n is the smallest integer such that words/ 120 
is less than or equal to n. The file size is n times records 
words. This value is converted to a sector count to make 
assignments. Neither the file size value nor the sector 
count value is saved. 



The general form of a file maintenance directive is 
directlve,liin.p<i ).p(2),... t p(n) 

where 

directive »$ one of the directives listed above in 

capital letters 

lun is the number or name of the affected 

logical unit 

each p(n) is a parameter defined under the 
descriptions of the individual directives 
below 

Numerical data can be octal or decimal. Each octal number 
has a leading zero. 

For greater clarity in the descriptions of the directives, 
optional periods, optional blank separators between 
character strings, and the optional replacement of commas 
(,) by equal signs ( - ) are omitted. 

Error messages applicable to file maintenance directives 
are given in Appendix A.9. 

9.2.1 CREATE Directive 

This directive creates a new file on the specified logical 
unit, allocates RMD space to the file, adds a corresponding 
entry to the file-name directory, and sets the current end- 
of file value to one greater than the address of the last 
sector assigned to the new file. 

The directive has the general form 

CREATE.kin. key.name, word*, records 

where 

lun is the number or name of the logical 

unit where the new file is to be 
created 



key 



name 



records 



is the protection code, if any, required 
to address kin 

is the name of the file being created 

is the number of words in each record 
of the file 

is the number of records in the file 



Example: Create the file XFILE with ten records of 120 
words each on logical unit 112, whose protection code ts K. 

CREATE, 112,K, XFILE, 120, 10 



9.2.2 DELETE Directive 

This directive deletes the designated file and all file name 
directory references to it from the specified logical unit It 
converts the specified file-name directory entry to a blank 
entry (name field - ****** t section 9.1.2) and all other 
directory references to this file to zero entries (all fields = 
zero, sectten 9.1.2), and outputs a listing of deleted file 
names on the LO logical unit. The directive has the general 
form 

DELETE, lun, fcey.name 



where 



key 



is the number or name of the logical 
unit from which the file is being deleted 

is the protection code, if any, required 
to address lun 

is the name of the file being deleted (in 
the case of a multtname file, any one of 
the names can be used, all names are 
deleted) 



The output format has, following the FMAIN heading, a 
two-line heading 



DELETE LISTING FOR lun 
PILE NAME START END 



CURRENT 



where lun is the number of the logical unit from which the 
file is being deleted. This heading is followed by a blank 
line and a listing of all filenames being deleted, one per 
line. Words 02 of the file-name directory entry (section 
9.1.2) are placed in the FILE NAME column; word 3, (in 
octal) in the CURRENT column; word 4, (in octal) in the 
START column; and word 5, (in octal) in the END column. 
After the last file name, there is an entry describing the 
blank file created by the deletion, where the FILE NAME 
column contains *•*•••, the START column contains the 
next available address (word 2 of the PST entry), and both 
the CURRENT and END columns contain the last address 
+ 1 (word 3 of the PST entry). 
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Example: Delete the file ZFILE (and all file name directory 
entries referencing it) from logical unit 112, whose 
protection code is P). 



Example: On logical unit 113, whose protection code is K, 
make the file XI accessible by using either the name XI or 
the name Yl 



DELETE, 112,P,SriLE 



ENTER ,113,K f X1,Y1 



The name ZFILE is replaced in the filename directory by 
o«»«*« an< j f ne 5p ace allocation for this blank entry 
extended in both directions to include adjacent blank 
entries, if any. Any blank entries thus absorbed are 
converted to zero entries, as are all other entries that 
reference the file ZFILE. AH affected filename directory 
entries are listed on the LO logical unit. 

9.2.3 RENAME Directive 

This directive changes the name of a file, but does not 
otherwise modify the file name directory. The directive has 
the general form 



RENAME.hin, key,ofd,new 



where 



lun is the number or name of the logical unit 

where the file to be renamed is located 

key is the protection code, if any, required to 

address lun 

okf is the old name of the file being renamed 

new is the new name of the file being 

renamed 

Following RENAME, old can no longer be used to reference 
the file. 

Example: On logical unit 1 12, whose protection code is P, 
change the name of the file XFILE to YFILE 

RENAME, t 12,P,XFILE, YFILE 



9.2.5 LIST Directive 

This directive outputs on the LO logical unit the file-name 
directory of the specified logical unit. The output comprises 
the file names, file extents, current end-of-file positions, 
logical-unit name or number, and the extent of unassigned 
space in the partition. All numbers are in octal. The 
directive has the general form 

LISTIunKey 



where 



kjn is the number or name of the logical unit 

whose contents are to be listed 

key is the protection code, if any. required to 

address tun 



The output format has a two-line heading 

PILE DIRECTORY FOR LUN lun 
PILE NAME START END 



CURRENT 



where lun is the number or name of the logical unit whose 
contents are being listed. This heading is followed by a 
blank line and a listing of all file names from the directory, 
one name per line. Words 0-2 of the filename directory 
entry (section 9.1.2) are placed in the FILE NAME column, 
word 4, (in octal) in the START column, word 3, (in octal) 
in the CURRENT column; and word 5, (in octal) in the END 
column. After the last file name, H there is any unassigned 
space in the partition, there is an entry describing the 
unassigned space in the partition, where the FiLE NAME 
column contains *UNAS*, the START column contains the 
next available address, and both the CURRENT and END 
columns contains the last address + 1. All numerical 
values are octal sectors. 



9.2.4 ENTER Directive 

This directive adds a new file name to be used in 
referencing an existing file, but does not otherwise modify 
the filename directory. ENTER thus permits multiname 

access to a file. The directive has the general form 



ENTER .lun, key ,oW, ne w 



where 



lun is the number or name of the logical unit 

where the affected file is located 

key is the protection code, if any, required to 

address lun 

old is an old name of the affected file 

new is the new name by which the file can 

also be referenced 



Example: List the file-name directory of logical unit 114. 
which has no protection code. 

LIST, 1ia 

9.2.6 INIT (Initialize) Directive 

This directive clears the entire file name directory of the 
specified logical unit, deletes all file names in it, and 
releases all currently allocated file space in the partition by 
reducing the file-name directory to a single end of directory 
entry. The directive has the general form 



INIT.Iun.fcey 



where 



lun 



key 



is the number or name of the logical unit 
being initialized 

is the protection code, if any, required to 
address lun 
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Example: Initialize the file-name directory on logical uni 
115, which has protection code X. 

INIT, 115, X 



9.2.7 INPUT Directive 

This directive specifies the logical unit from which object 
modules are to be input. Once specified, the input logical 
un.t number is constant until changed by a subsequent 
INPUT directive. The directive has the general form 



iNPUT.hiMey.ftfe 



where 



lun 



key 



is the number or name of the logical unit 
from which object modules are to be 
input 



is the protection code, if any, required to 
address lun 



modules are copied from the SW logical unit onto the 
specified logical unit. The directive has the general form 

ADD, lun, key 



where 



kin 



key 



is the number or name of the logical unit 
onto which object modules are to be 
written 



is the protection code, if any, required to 
address hin 



The specified logical unit lun references a system or user 
object module library. 

The names of the object modules and thetr date of 
generation, size in words (zero for FORTRAN modules), 
entry names, and referenced external names are listed on 
the LO logical unit. 

To recover from errors in object-module processing, reposi 
tion the logical unit to the beginning of the module. 



tile is the name of the RMD file containing 

the required object modules) 

Neither key nor lite are required unless lun is a RMD 
partition. 



Example: Add object modules to logical unit 104, which 
has protection code D. 

ADD, 104 f D 



NOTE 

There is no default value. Thus, if an attempt is 
made to input an object module (ADD directive, 
section 9.2.8) without defining the input logical 
unit by an INPUT directive, an error message 
will be output. 



Examples: Specify logical unit 6 as the device from which 
object modules are to be input. 

INPUT, 6 



9.3 VORTEX FOREGROUND FILE 
MAINTENANCE (VfFGFM) 

The VORTEX Foreground File Maintenance program pro 
vides a subset of the VORTEX FMAIN services. V$FGFM 
executes as an independent task from the VORTEX 
foreground library at the same priority as the calling task 
The interface to V$FGFM is the subroutines, V$FILE, which 
must be in the Object Module Library and VJFMCB which 
must be resident in the nucleus table area (this occurs 
automatically during system generation unless modules are 
specifically deleted). 



Open and rewtnd the file ARCTAN on logical unit 104, 
wruch has protection code D. 

INPUT, 104,D f A»CTAN 

9.2.8 ADD Directive 



The calling sequence to request a file service is as follows: 



EXT 


VSFILE 


LDAI 


code 


LDBI 


fmcb 


JSR 


V$FILE r X 



This directive reads object modules from the INPUT unit 
(section 9.2.7) and writes them onto the SW logical unit, 
checking for entry names and validating checksums, 
record sizes, loader codes, sequence numbers, and record 
structures. Reading continues until an end of file is 
encountered. Entry names are then added to the file-name 
directory of the specified logical unit and the object 



where 



code is the operation code for the requested 
service 

« create 

1 - delete 

2 - rename 
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enter 

unused 



fmcb is the address of the file maintenance 
control block (see table) 

The create, delete, rename and enter requests perform the 
same operations as in the VORTEX FMAIN program. The 
unused request releases the unused portion of the named 
file which is that area of the file beyond the current end-of 
file. 

Upon exit from a file request the A register contains the 
completion status code. The interface program allows only 
one fHe request to be processed at a time. If upon entry a 



previous request is being processed (V$FMCB is busy), 
VSFILE executes a 500 millisecond DELAY and tries again 
If ater 15 seconds (30 retries) V$FMCB is still busy V$F!LE 
will proceed to schedule V$FGFM and process the new 
request The completion status codes are as follows: 

1 busy 

request completed without error 

1 invalid request code 

2 name already in directory 

3 name not found 

4 ^sufficient space 

5 input /output error occurred 

6 directory structure error 



The file maintenance control blocks for the requests must 
be arranged as follows: 



Word 



Create 



Delete Unused 



Rename Enter 



logical unit 

key 



file name 
number of sectors 



logical unit 
key 



file name 



logical unit 
key 



current file name 
new file name 
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SECTION 10 

INPUT/OUTPUT UTILITY PROGRAM 



The I/O utility program (IOUTII) is a background task for 
copying records and files from one device onto another, 
changing the size and mode of records, manipulating files 
and records, and formatting the records for printing or 

display. 

10.1 ORGANIZATION 

IOUTII is scheduled for execution by inputting JCP 
directive /IOUTIL (section 4.2.20) on the SI logical unit. If 
the SI logical unit is a Teletype or a CRT device, the 
message III** is output to indicate that the SI unit is 
waiting for IOUTIL input. Once activated, IOUTIL inputs 
and executes directives from the SI unit until another JCP 
directive (first character is a slash) is input, at which time 
tOUTIL terminates and the JCP is again scheduled. 

•The IOUTIL buffer is usually 1024 words long. The /MEM 
directive can be used to increase this size by increments of 
512 words." 

fOUTIL has the option of calling V$RSW (multi-volume reel- 
switch routine), when using a copy file, copy record, skip 
file, skip record, format and dump, position file, and pack 

binary. 

Error Messages applicable to IOUTIL are given in Appendix 
A. 10. Recovery from an error is by either of the following: 

a. Input the character C on the SO unit, thus directing 
IOUTIL to go to the SI unit for the next directive. 

b. Input the corrected directive on the SO unit for 
processing. The next IOUTIL directive is then input 
from the SI unit. 

if recovery is not desired, input a JCP directive (section 
4 2) on the SO unit to abort IOUTIL and schedule the JCP 
for execution. . 

10.2 I/O UTILITY DIRECTIVES 

This section describes the IOUTIL directives: 



COPYF 


Copy file 


COPYR 


Copy record 


SFILE 


Skip file 


SREC 


Skip record 


DUMP 


Format and dump 


PRNTF 


Print file 


WEOF 


Write end of file 


REW 


Rewind 


PFILE 


Position file 


CFILE 


Close file 


PACKB 


Pack binary 



blanks. The character strings are separated by commas (,) 
or by equal signs ( - ). The directives are free-form and 
blanks are permitted between individual character strings 
of the directive, i.e., before or after commas (or equal 
Signs). Although not required, a period (.) is a line 
terminator. Comments can be inserted after the period 

The general form of an tOUTIL directive is 
,p(l),p(2),...,p(n) 



where 



name 



each p(n) 



is one of the directive names given 
above 

is a parameter defined below under the 
descriptions of the individual directives 



Numerical data can be octal or decimal. Each octal number 
has a leading zero. 

For greater clarity in the descriptions of the directives, 
optional periods, optional blank separators between 
character strings, and the optional replacement cf commas 
(,) by equal signs ( « ) are omitted. 

The IOUTIL buffer is usually 1024 words long The /MEM 
directive can be used to increase this size by increments of 
512 words. 



10.2.1 COPYF (Copy File) Directive 

This directive copies the specified number of files from the 
indicated input logical unit to the given output logical 
unit(s). The directive has the general form 

COPYF,f,iu,lm,irl,ou( 1 ),om,orl, ou(2), ou(3) t ...,ou(n) 



where 



im 



irl 



IOUTIL directives begin in column 1 and comprise 
sequences of character strings having no embedded 



is the number of input files to be copied 
(must be 1 for RMD) 

is the name or number of the input 
logical unit 

is for binary, 1 for ASCII. 2 for BCD or 
3 for unformatted input files 

is the number of words in each record of 
the input files. If a value of zero is 
specified then the record length is set to 
the maximum buffer size. Following the 
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ou(n) 



om 



read the actual physical record length 
(word 5 of the RQBLK) is used as the 
input record length. 

is the name or number of an output 
logical unit 

is for binary, 1 for ASCII, 2 for BCD, or 
3 for unformatted output files 



or! 



is the number of words in each record of 
the output files. If a value of zero is 
specified then the output record length 
is equal to the input record length. 
Any RMD involved with copying files, whether as input or 
output medium, must have been previously positioned with 
a PFILE directive (section 10 2 9). 

If a difference in record lengths irl and orl causes a partial 
record to remain when an end of file is encountered, the 
part-record is filled with blanks and thus transmitted to the 
output unit(s). 

The following relation holds for input /output record 
lengths: 



Input 


Output 






RCL 


RCL 




Output Format 


fixed 


fixed 




As defined (blocked or 
unblocked) 


random (0) 


fixed 




As defined (blocked or 
unblocked) 


fixed 


random 


(0) 


Unblocked only 


random (0) 


random (0) 


Unblocked only 



Record lengths of zero are useful in copying mixed ASCII 
and binary data from cards to another media or vise versa. 
ASCI) read must be specified for this operation. 



Example: Copy three files containing 120-word records 
from the PI logical unit onto logical units LO, 50, and 51 in 
40-word records. 

COPYF,3,PI, t, 120, LO, 1,4,0,50,51 



10.2.2 COPYR (Copy Record) Directive 

This directive copies the specified number of records from 
the indicated input logical unit to the given output logical 
unit(s). The directive has the general form 

COPYR 1 r,hi t im,H ( ou(l) f om 1 orl,ou(2),ou(3),...,ou(n) 



where 



iu ts the name or number of the input 

logical unit 

im is for binary, 1 for ASCII, 2 for BCD, or 

3 for unformatted input records 

*rl is the number of words in each record of 

the input files. If a value of zero is 
specified then the record length is set to 
the maximum buffer size. Following the 
read the actual physical record length 
(word 5 of the RQBLK) is used as the 
input record length. 

each ou(n) is the name or number of an output 
logical unit 

om is for binary, I for ASCM, 2 for BCD, or 

3 for unformatted output records 

orl is the number of words in each record of 

the output files. If a value of zero is 
specified then the output record length 
is equal to the input record length. 



Any RMD involved with copying records, whether as input 
or output medium, must have been previously positioned 
with a PFILE directive (section 10.2.9). 

If a difference in record lengths Irl and or! causes a part 
record to remain when an end of-ftle mark is encountered, 
the part record ts filled with blanks and thus transmitted to 
the output unit(s). 



Exampte: Copy 25 unformatted records of 200 words each 
from the SS logical unit to the BO and PO units in binary 
format with 40 words per record. 

COPYR f 25 , 86 , 3 , 200 , BO , , 40 , PO 

It may be necessary to copy from one file on an RMD 
partition to another file on the same partition. This can be 
accomplished by assigning two different logical units to this 
RMD partition, and then issuing two PrlLE directives 
(section 10.2.9), positioning one logical unit to the 
beginning of one file and the second logical unit to the 
beginning of the other file. Additional positioning within 
the files can be specified by SREC directives (section 
10.2.4). 

The following relation holds for input /output record 
lengths: 



is the number of input records to be 
copied, or if copying ts to continue to 
the end of file 



Input 
RCL 


Output 
RCL 


Output Format 


fixed 


fixed 


As defined (blocked or 
unblocked) 


random (0) 


fixed 


As defined (blocked or 
unblocked) 
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Input 
RCL 

fixed 
random (0) 



Output 
RCL 

random (0) 
random (0) 



where 



Output Format 

Unblocked only 
Unblocked only 



Record lengths of zero are useful in copying mixed ASCII 
and binary data from cards to another media or vise versa. 
ASCII read must be specified for this operation. 

Example: Copy the first ten records from file EDIT1 to 
record 11 through 20 of file EDIT2. Both files are on RMD 
partition DOCK have record lengths of 120 words, are in 
mode 1, and have no protection key (default value - 0) 
Assign the SI and BO logical units to the disc. 

/ASSIGN, BI-DOOK 
/ASSIGN, BO-O00K 

/IOUT2L 

PFXLE.BI, , 120,EDIT1 

PFILE,BO, , 120,RDIT2 

SREC, BO, 10 

COPYR, 10,BX, 1, 120,BO, 1, 120 



lun 



nrec 



is the name or number of the affected 
logical unit 

is the number of records to be skipped 



Note that, unlike JCP directive /SREC (section 4.2.8), the 
IOUTIL directive SREC cannot skip records in reverse. 

If lun designates an RMD partition, the device must have 
been previously positioned with a PFILE directive (section 
10.2.9). 

If a file mark, an end-of tape mark, or an end of device 
mark is encountered before the required number of records 
has been skipped, IOUTIL outputs to the SO and LO logical 
units the error message IU05,nn, where nn is the number of 
records remaining to be skipped 

Example: Skip 40 records on the Bl logical unit. 

SREC,BI, ftO 



10.2.3 SFILE (Skip File) Directive 

This directive, which applies only to magnetic-tape units, 
and card readers, causes the specified logical unit to move 
the tape forward the designated number of end-oMile 
marks The directive has the general form 



SFiie ( kin,neof 



where 



lun is the name or number of the affected 

logical unit 

neof is the number of end-of file marks to 

be skipped 

if the end of tape mark is encountered before the required 
number of files has been skipped, IOUTIL outputs to the 
SO and LO logical units the error message IU05,nn, where 
nn ts the number of files remaining to be skipped. 

Example: Move tape on unit PI past three end-of file marks. 
SFILE, PI, 3 

10.2.4 SREC (Skip Record) Directive 

This directive, which applies only to magnetic-tape units, 
card readers and RMDs, causes the specified logical unit 
to skip forward the designated number of records. The 
directive has the general form 

SREC.Iun.nrec 



10.2.5 DUMP (Format and Dump) 
Directive 

This directive copies the specified number of records from 
the indicated input logical unit, formats them for listing, 
and dumps the data onto the output unit in octal format, 
ten words per lin*\ with one blank between words. The 
directive has the genera! form 

DUMP,r,iu,im,irl,ou 



where 



im 



irl 



ou 



is the number of input records to be 
dumped or is zero if dumping ts to 
continue to an end of-file 

is the name or number of the input 
logical unit 

is for binary. 1 for ASCII 2 for BCD or 
3 for unformatted input records 

is the number of words in each record of 
the input 

is the name or number of the outout 
unit, which cannot be an RMD partition 



The first line of the dump contains the record number 
before word 1, but subsequent lines do not have the record 
number. 

If ASCII mode is specified by im then an ASCII scan and 
dump will be made in addition to the octal dump Printable 
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character bytes will appear to the right of each line of the 
octal dump. Non printable characters will appear as ASCII 
blanks. ASCII scan and dump is suppressed if dump is to a 
TY or CT device regardless of the mode. 

Example: Dump 40 binary. 50 word records from the SW 
logical unit onto the LO unit 

DUMP,40,SW,0,50,LC 



10.2.7 WEOF (Write End of File) 
Directive 

This directive writes an end of file mark on each logical unit 
specified. The directive has the general form 

WEOF,lun,/un /un 

where each fun is the name or number of a logical unit 
upon which an end of- file mark is to be written 



10.2.6 PRNTF (Print File) Directive 

This directive prints the specified number of files from the 
indicated input logical unit to the list output logical unit(s) 
specified. The directive has the general form 



PRNTF,f t iu t ou(l),ou(2), ou(n) 



where 



is the number of files to be printed 

is the name or number of the input 

logical unit 



each ou(n) is the name or number of a list output 
logical unit 



If an RMD is specified as the input logical unit, it must 
have been previously positioned with a PFILE directive 
(section 10.2.9) and only one file may be printed at a time 
(i.e., if it is greater than 1, it is defaulted to 1), because the 
end of file terminates printing. 



Example: Write an end -of file mark on the BO logical unit 
and on the PO logical unit. 

WEOF , BO , PO 



10.2.8 REW (Rewind) Directive 

This directive, which applies only to magnetic-tape units, 
causes the specified logical unit(s) to rewind to the 
beginning of tape. The directive has the general form 

REW,kiiMun,...,run 

where each run is the name or number of a logical unit to 
be rewound. 

Example: Rewind the Bl and PO logical units 

RBW,BI,PO 



This directive is designed to print list output files directed 
to devices other than a line printer (i.e., magnetic tape or 
disc). Therefore, the input file is read in ASCII mode (1), 
132 characters, and the list output records are written also 
m ASCII mode. 



Example: Print two (2) files on magnetic tape unit 18 on 
LO. 

/IOUTIL 
REW, 18 

PRNTF, 2, 18.LO 
/BNDJOB 



Example: Print an RMD file called SYSOUT in logical unit 
25 to LO. 



10.2.9 PFILE (Position File) 
Directive 

This directive, which applies only to rotating memory 
devices, causes the specified logical unit to move to the 
beginning of the designated file, and opens the file. The 
directive has the general form 



PFILE.Iun.fcey.recLname 

where 

lun is the name or number of the affected 

logical unit 

key is the protection code required to 

address kin 



/IOUTIL 

PFILE, 25, , 120, SYSOUT 

PRNTF, 1,PI,LO 

/ENDJOB 



reel is the number of words in each record of 

the file 

name is the name of the fife to which the 

logical unit is to be positioned 
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Since IOUTIL has onty six FCBs, there can be a maximum 
of six fiies open at any given time. 



im 



is for binary, 1 for ASCII, 2 for BCD or 
3 for unformatted input files 



irl 



Example: Position the PI logical unit, using protection 
code 2. to the beginning of the file FILEXY, which contains 
60 word records. 

PFILE,PI,Z,60,FILBXY 



10.2.10 CFILE (Close File) Directive 

This directive, which applies only to RMD partitions, closes 
the specified file. The directive has the general form 



CFILE, lun, *ey,nam«, add 



where 
lun 



is the name or number of the logical unit 
containing the file to be closed 



key is the protectton code required to 

address lun 

name is the name of the file to be closed 

add is (default value) if the current end-of- 

file address on the RMD file-directory is to 
remain unchanged, or 1 if it is to be 
replaced by the current record (i.e., actual) 
address 

A PHLE directive (section 10.2 9) must have been used to 
position lun before the CFILE directive is issued. Closing a 
ftie frees the associated FCB for use with another file. Since 
IOUTIL has only six FCBs, there can be a maximum of six 
files open at any given time 

Example: Close the file WORK on the SW logical unit 
(protection code B) and update the tile directory. 

CFILE, SW,B f WORK, 1 



10.2.11 PACKS (Pack Binary) Directive 

This directive copies the specified number of fiies from the 
indicated input logical unit to the given output logical 
unit(s). It causes each new system binary program to start 
on a record boundary. The directive has the general form 

PACKB,fJu.im,irl,ou(l),om,orl,ou(2),...ou(n) 

where 



is the number of input files to be copied 

is the name or number of the input 
logical unit 



ou(n) 



om 



orl 



is the number of words in each record of 
the input files, tf a value of zero is 
specified then the record length is set to 
the maximum buffer size. Following the 
read the actual physical record length 
(word 5 o1 the RQBLK) is used as the 
input record length. 



is the name or number of an output 
logical unit 

is for binary, 1 for ASCII. 2 tor BCD. or 
3 for unformatted output files 

is the number of words in each record of 
the output files If a value of zero is 
specified then the output record length 
is equal to the input record length 



The following relation holds for input /output record 
lengths: 



Input 


Output 




Output 


RCL 


RCL 




Format 


fixed 


fixed 




As defined (blocked 
or unblocked) 


random (0) 


fixed 




As defined (blocked 
or unblocked) 


fixed 


random (0) 


Unblocked only 


random (0) 


random 


(0) 


Unblocked only 



Any RMD used in this directive must have been previously 
positioned with a PFILE directive (section 10 2.9) 

This directive can be used for any output media and any 
record length. It is primarily intended to be used for RMD 
output of 120 words Use with non RMD output may not 
produce the intended effect 

Example: Pack one binary file from the card reader onto 3 
RMD file on logical unit 25 in 120 word blocks 

PACKS ,1,CR ,0,60, 25,0,120 



10.3 MULTIVOLUME TAPE HANDLING (V$RSW 

IOUTIL provides the operator with interfaces necessary for 
handling multi volume (i.e.. multireel), magnetic tape files 
The routine directs the operator to unload the current 
magnetic t9pe volume and mount a new one whenever enri- 
of-tape is encountered 
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The magnetic tape unit to be unloaded is given a rewind 
directive and the following message is output to the 
operator: 



IOUTIL 
IOUTIL 



where 



nn 



UNLOAD LUN nn 
MOUNT NBXT VOLUME 



is the logical unit number of the 
magnetic tape to unload 



Alter the message tor mounting a new magnetic tape has 
been output to the operator, the subroutine issues a 
suspend request. When the new volume has been success 
fully mounted, the operator can continue execution by 
keying in the following: 

; RESUME, IOUTIL 

If the mounting of a new magnetic tape volume is not 
needed, the operator wilt key in the message ? ABORT, 
IOUTIL on the OC device, which will return control to 
JCP 
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VSORT (SORT/MERGE) 



The VORTEX Sort/ Merge (VSORT) task constructs a sorted 
file in the order determined by fields selected by the user. 



c. A user input exit routine is specified (by the 1NEXIT 
directive) 



11.1 ORGANIZATION 

VSORT is scheduled as a background task by the Job 
Control Processor (JCP, section 4.2.19) upon input of the 
JCP directive 

/LOAD, VSORT 

Once activated, VSORT inputs the sort parameters from the 
SI logical unit. The maximum number of VSORT directives 
is five records. The directive ENDSORT terminates the 
input of VSORT directives within five records. Upon 
completion of the sort /merge, VSORT exits to JCP. 

VSORT has a buffer area large enough for most sort/ merge 
operations. To increase the size of the buffer, mput a 
/MEM directive (see section 4.2.3) immediately preceding 
the /LOAD. VSORT directive. 

Inputs to VSORT comprise 

a VSORT directives (section 112) input through the SI 
logical unit 

b. File to be sorted, input through the INPUT logical unit 
Outputs from VSORT comprise 

a. Sorted file on the OUTPUT logical unit 

b. I istmg of VSORT directives on the LO logical unit 

c. Ltsting of VSORT totals for the sort /merge on the LO 
logical unit 

d Error messages, if any, on the LO logical unit 

Error messages applicable to VSORT are given in Appendix 
All. 

VSORT performs either a full-record sort or a tag sort. In a 
full record sort the entire records are moved in central 
memory in order to accomplish the sort. In a tag sort, only 
the concatenated sorting control fields and the record 
numbers are manipulated in central memory. VSORT will 
perform the more efficient tag sort unless one of the 
following conditions occurs: 

a. INPUT file is not an RMD 

b. The file used for INPUT is also used for another file in 
the sort, either as a WORK or OUTPUT file 



Workspace Requirements: Each work file must be large 
enough to contain a number of work records equal to. the 
number of input records For tag sorts, the length of the 
work records is equal to the sum of the length of the control 
fields plus one word- On full record sorts, the sum of the 
control fields plus one input record length is needed 

Work records are blocked with a blocksi/e equal to a fourth 
or third qi the central memory workspace for the merge 
phase. 

Work space for the sort phase in central memory is 
allocated dynamically to overlay the initialization routine 
(about 2K), which occupies the highest memory locations of 
VSORT. Work space tor the merge phase occupies an 
additional IK in central memory. Additional work space 
may be allocated for a background sort by using the /MEM 
directive (JCP, 4.2.3). 



11.2 VSORT DIRECTIVES 



This section describes the VSORT directives 



a. Reqwed Group 

SORT 
INPUT 
OUTPUT 
WORK 



Sort directives follow 
Define logical unit for input 
Define logical unit for output 
Define work file(s) 



SORTKEY Define sorting field(s) 
ENDSORT Begin sorting 



b. Optional Group 

INEXIT 
OUTEXIT 



Use input preprocessor 
Use output preprocessor 



The general form of a VSORT directive is 

name » p(l),p(2),...,p(n) terminator 

where 

name is one of the VSORT directives 

pfiij is a parameter required by VSORT ^nd 

defined below under the descriptions of 
the individual directives 

terminator is a blank or right parenthesis 
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11.2 .1 SORT Directive 

This directive starts the series of directives. The general 
form is 

SORT 

The word SORT must be followed by at least one blank. 
The SORT directive must be the first directive on the first 
control record. 



11.2.2 INPUT Directive 

This directive describes the sort input file which contains 
the records to be sorted. It has the general form 

INPUT - (lun,ff/ename,fcey,recordlength) 

where 

km is a 1 to 3 character decimal number 

specifying the logical unit of the file 

filename is a 1- to 6 character name of the file as 
it exists on the RMD file directory 
(required for all RMD filet) 

key is the single character file protection 

key, as contained in the file directory for 
the file (required only H the filename is 
present and the RMD is protected 

recordlength is a 1 to 4-digit decimal number 
specifying the length in words of the 
records in the file. 



Example: Describe a sort input file on magnetic tape on 
logical unit 18, which has 200 word records. 



11.2.4 WORKl t WORK2,WORK3, Directives 

These directives describe the intermediate work files for 
the sort. They have the general form 



INPUT-( 18, , ,200) 



11.2.3 OUTPUT Directive 



This directive describes the output file which will ultimately 
contain the sorted records. It has the general form 

OUTPUT ■ (hOT.fi/ename, key.recordlength) 

where km, fi/ename, key and recordlength are the same as 
they are described in the INPUT directive (section 1 1.2.2). 

Example: Describe a sort output file on a line printer logical 
unit 5, which has a 60-word (120-cbaracter) record. 

OUTPUT- ( 5, , ,60) 



WORK 



fii- 



(hin,fHename,*ey; 



where kin, filename, and key are the same as described for 
the INPUT directive (section 112.2) 

The work files must be RMD files. Each file must have 
sufficient space to contain the intermediate work records 
equal to the number of records in the input file for the sort. 

Example: Describe intermediate sort files named Wl, W2, 
and W3 on RMD logical unit 25. These files do not have 
protection keys. 

HORKt-<a5,W1),WORX2«(25,W2),WORK3-(25,W3) 

11.2.5 SORTKEY Directive 

This directive describes one to six control fields to be used 
to sequence the records of the sort input file. It has the 
general form 

SORTKEY •(sc(l) t ec(l) f order(lX ,scr6),ec(6),oroV(6)) 

where each 

sc(n) is a one- to four digit decimal number 

specifying the starting character (or 
byte) position of the control field as it 
exists in the input record, or, if there 
positions are modified by an IN EX IT 
routine, as they exist in the modified 
input record. 

ec(n) is a one- to four-digit decimal number 

specifying the ending character (or byte) 
position of the control field. It must be 
greater than or equal to the preceding 
starting character position 

order(n) is a single character A or D lor 

ascending or descending sequence, 
respectively, for sorting the control *ield 

At least one control lietd specification must be given. Each 
control field specification, must have alt three parameters 
specified. 

Control fields may overlap. 

Character positions are numbered starting with one 

The significance of a control field depends on its placement 
in the SORTKEY directive. The first control field defined is 
the most important (or major) control field. The next is the 
secondary (used in cases of matches in the first) control 
field. Similarly, until the last specification gjven is the teast 
important. 
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Collating sequence: An algebraic collating sequence is used 
to sort the data. Each word (in numeric data) or each byte 
(in character data) is interpreted as an octal number 
having an algebraic sign. Thus. ASCII characters have the 
collating sequence from 0240 (low) to 0337 (high). If 
characters are other than ASCII, the sign bit (bit 7) of each 
8 bit character must be the same for all the characters. 

Word boundary data are treated as signed octal numbers 
and have the collating sequence from 0100000 (low) to 
077777 (high). Thus, FORTRAN variables of integer, real, 
complex or logical types may be sorted with SORT control 
fields. FORTRAN double-precision numbers cannot be 
sorted because the sign of the number is not in the first 
word. 

Example: Describe two control fields, one is bytes 27 and 
28 in ascending order, and the other is byte 1 through 4 to 
be sorted in descending order. 

SORTKBY-(27,28,A, 1,«,D) 



11.2.6 INEXIT Directive 

This optional directive specifies whether a user-written 
input exit routine is to be called at the time the input file is 

being read by the sort part of VSORT. The general form of 
the directive is 



INEXIT 



W 



The equal sign may be followed by a string of up to four 
alphabetic characters. Unless YES is specified, the default 
is NO (a user routine is not called). YES or NO must be 
followed by at least one blank. 



11.2.7 OUTEXIT Directive 

This optional directive specifies whether a user written 
output exit routine is to be called at the time the final file 
output file is being created by the merge phase of VSORT. 
It has the general form 



OUTEXIT 



to 



The meaning of YES and NO is the same as described for 
the INEXIT directive (section H.2.6). 



11.2.8 ENDSORT Directive 

This directive signals the end of the sort directives. The 
word ENDSORT must be followed by at least one blank as 
the last directive on the last control record for VSORT. 



11.3 USER EXITS 

User exits provide for the insertion, deletion, or modifica 
tion of input and output records by user-written routines. 
Exits are requested by the VSORT directives, INEXIT » 
YES and/or OUTEXIT - YES. The exit routines written by 
the user are added to VSORT at load-module generation 
time. 

The input exit routine, if provided, is called for each input 
record before it enters the sort Possible uses of the input 
exit are 

• Add input records 

• Delete input records 

• Create part or all of the input f?le 

• Change input records, such as control fields 

The input record length may be changed to the output 
record length specified on the OUTPUT directive 

The output exit routine, if provided, is called for each 
output record before it is written on the output file 
Possible uses for the output exit are 

• Add output records, effectively merging one or more 
files with the sorted file 

• Delete sorted output records, such as duplicates 

• Change the sorted output records 

If output records are added or changed, it's the user's 
responsibility to ensure that the control fields of the output 
records remain in sequence 



11.3.1 Calling Sequence 

VSORT uses the following calling sequence for user exits; 



Word 1 
Word 2 
Word 3 
Word 4 


JMPM XITn 


input buffer address 


output buffer address 


flag 



where 



input 
buffer 
address 



is 1 for input exit and 2 for output exit 

is the address of input record passed to 
the user routine (INEXIT) or the address 
to which the user must move a record if 
it is to be inserted before the output 
record (or EOF) passed to the user 
routine (OUTEXIT) 
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output buffer 
address 



flag 



is the address of the output record 
passed to the user routine (OUTEXIT) 
or the address to which the user must 
move a record if it is to be inserted 
before the input record (or EOF) passed 
to the user routine (INEXIT) 

is set by VSORT as tor an EOF en- 
countered, 1 for INEXIT, or 2 for OUT- 
EXIT; otherwise it is set by the user rou- 
tine as follows 

Bit = 1 accept input record (INEXIT) 
or insert record in input buffer 
before output record (OUT- 
EXIT) 
- is ignore the record in the 
input buffer 

Bit 1 = 1 accept the output record 

(OUTEXIT) or insert record in 
the output buffer before the 
input record (INEXIT) 

* ignore the record in output 
buffer 



After EOF notification has t«en given to the user input 
(output) exit routine, the user routine may continue to pass 
records to VSORT in the buffer, but the contents of the 
buffftr are ignored. 



XIT1 User input exit entry point 

XIT2 User output exit entry point 

To build a load module using user exits, place the user exit 
modules in front of the VSORT object module and proceed 
to generate a single load module. 



11.4 VSORT MESSAGES 

In addition to listing the VSORT directives, VSORT outputs 
the following totals: 

a. End of sort phase totals 

SORT PHASE COMPLETE, TOTAL MERGE 
RECORDS-XXXXX 



INPUT XXXXX ACCBPTED-XXXXX 
INSERTED-XXXXX DELETED-XXXXX 



b. End of merge phase totals 



11.3.2 Implementation 

The exit routines written by the user must have the 
following external names 



SORT COMPLETE, OUTPUT RECORDS 
COUNT-XXXXX 

MERGE-XXXXX ACCEPTED-XXXXX 
INSERTED-XXXXX DELETED-XXXXX 
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SECTION 13 
SUPPORT LIBRARY 



The VORTEX system has a comprehensive subroutine 
library directly available to the user The library contains 
mathematical subroutines to support the execution of a 
program, plus many commonly used utility subroutines. To 
use the library, merely code the proper call in the program, 
or lor the standard FORTRAN IV functions, implicitly 
reference the subroutine (e.g., A = SQRT(B) generates a 
CALL SQRT(B)). All calls generate a reference to the 
required routine, and the load module generator brings the 
subroutine into memory and links it to the calling program 

The performance of several routines in the support library 
is improved through the use of the V70 series Floating 
Point Firmware on V70 series systems having Writable 
Control Store (WCS). The necessary firmware and library 
routines which call the firmware are added to the Object 
Module Library (OM) by executing the supplemental WCS 
job stream supplied with the System Generation Library 



13.1 CALLING SEQUENCE 



The subroutines in the support library are called through 
DAS MR or FORTRAN IV 
DAS MR: Genera! form 

label CALL S,p(l).p(2) 



.p(n 



Expansion 

label 



JMPM 
DATA 
DATA 



DATA 



S 

p( 1) 

p(2) 



FORTRAN IV: General form 

statement number CALL S(p(l).p(2), .p<n)) 

Generated code 



JMPM 


S 


DATA 


q( 1 ) 


DATA 


q( 2) 



DATA 



q(n) 



p(n) 

Single-Precision Floating Point Numbers 



Where q(i) = p(i) if p(i) is a single variable or array nsme 
Otherwise, q(i) = address containing p(i) 



13.2 NUMBER TYPES AND FORMATS 

Integers use one 16 bit word. A negative number is in two's 
complement form. An integer in the range - 32767 to 
+ 32,767 can be stored as an integer 



Real numbers use two consecutive 16-bit words For a 
positive real number, the exponent (in excess 0200 form) is 
in btts 14 to 7 of the first word The mantissa is in bits 6 to 
of the first word and bits 14 to of the second word The 
sign bit of the second word is zero. The negative of this 
number is created by one's complementing the first word 
Any real number :n the range 10" "can be stored as a 
single precision floatingpoint number having a precision of 
more than six decimal digits 



Bit 

n) 
n+1 ) 



15 
s 





14 13 



Bit 


15 


n) 





n+1 ) 


s 


n + 2 ) 





n + 3) 






12 11109 876 5 4 3 2 1 
Exponent High Mantissa- 

L OW Mantissa 

Double -precision floating point numbers use four consecu 
tive 16 bit words. The exponent (in excess 0200 form) is m 
bits 7 to of the first word. The mantissa of a positive 
number is in the second, third, and fourth words Bit 15 of 
the second, third and fourth words and bits 15 to 8 of the 
first word are zero The negative of this number is created 
by one's complementing the second word. Any real number 
in the range 10 ± '" can be stored as a double precision 
floatingpoint number having a precision of more than 13 
decimal digits 

Double- Precision Floating-Point Numbers 
14 13 12 1110 9 8 76 54 3 2 1 

Exponent 

High Mantissa 

M id Mantissa 

Low Mantissa 
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13 3 SUBROUTINE DESCRIPTIONS 

The following definitions and notation apply to the 
subroutine descriptions given tn this section 

Notation Meaning 

AH Hardware A and B registers 

AC Four word software accumuia! ;r for double 

precision numbers 

ACCZ Four word accumulator for complex numbers 

(the real part is in AB and the imaginary 
part is in a temporary c^M in subroutine V$8G) 

•i Address of a double precision number 

' Address of a two word, fixed point number 

Address of an integer 



r Address of a real number 

b A six character ASCII string 

X Hardware X register 

Address of a complex number 

Exponentiation 

An additional name m parentheses indicates a replace 
ment by standard firmware For example. $SE(FSE) 
indicates the firmware routine FSE replaces $SE on ?o 
series systems using standard firmware Section 20 2 
describes standard firmware 

The external references in table 13-3 refer to items in 
tables 13 1 and 13 2. A subroutine with more than one 
name is indicated by multiple calls under Calling Sequence 



Name 




Function 


$HF 


Given 


A contains G. 




in A 


compute .1 1 2 


SPF 


Givf'i'i 


AB contains r 




in At. 


i. t 'impute r i 



$QF_ 



AlOG 



I < 



Table 131. DAS Coded Subroutines 

Calling Sequence 

CAl I $HF..i2 

CAM $PE,i 



Given AB contains rl. 
m AB. compute rl r2 

In AB, compute In r If r -0, 
output message FUNC ARG and 
exit W( th A ^ B = and 
overflow - 1 

in AB. compute e r If there 
= s underflow, AR - If 
overflow, AB - maximum real 
number and the message FUNC 
ARG is output In both 
cases, overflow - 1 



CAM SQF.n' 



CAl I. AlOG f 



CAl I EXP 



External References 

SSF.(FSE), $HM 

$SE(FSF_) $QM, $QN 
ALOG %QM, tXP $SF(FSL) 



$EE. SQKfFADi $QM. XDMU 
XDAD. $NML XDDI. 

xdsu. $sE{Fsn. $pc $Ql{Fsb: 

$QN 

XDMU, $QK(FAD). $NML. $FF 
$QM $QN. $SF(FSF) 



A IAN 'n AB. compute arctan r 



SINCOS in AR. compute cos r with 

COS. or sm r with SIN 

SQRT In AB, < ompute square root of r 

FMULDIV Given AB contains rl. m AB. 
compute rl t2 with $QM, or 
rl/r? with %QN |f (here is 
underflow. AB =0 If 
overflow AB = maximum value 
and the message ARITH OVFL is 
output In both cases, 
overflow - 1 



CALL ATAN 



CALL COS r 
CALL SIN r 

CALL SQRT r 

CALL $QM r,-' 
CALL %QN r2 



SQM $QL(FSB) $QN $QK(^AD) 
SStfFSF) 

$QK(FAD),$QL(FSBi. SQM. SQN, 
$SE(FSF> 

XDDI. $FSM. $SE(FSE) 

XDMU. $FMS, XDD!. 
$SL(FSE>. $FE. $NML 
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Tabic 13-1. DAS Coded 
Name Function 

FADDSUB Given: AB contains rl. in AB, 
compute rl + r2 with $QK, or 
rl -r2 with $QL If there 
is underflow, AB = If 
overflow, AB « maximum value 
and the message ARtTH OVFL is 
output. In both cases, 
overflow « 1 

SEPMANTI Separate manttssa and 

characteristic of r into AB 
and X, respectively 

FNORMAL In AB, normalize r 

XDDIV In AB. compute 11/(2 

XDMULT In AB. compute U t2 

XDADD In AB. compute fl + f2 

XDSUB In AB. compute fl -12 

XDCOMP In AB. compute negative of f 

$FLOAT In AB. convert the i in A 

to floattng point and. for 
$QS. store result in r 

$IFIX in A. convert the r in AB 

to i and. for $HS, store 
result in i 

IABS In A. compute absolute t 

ABS In AB. compute absolute r 

ISIGN Set the sign of il. m A, 

equal to that of i2 

SIGN Set the sign of rl, m AH 

equal to that of r2 

$HN Given A holds il. 

in A. compute il/i2 

$HM Given A holds il. tn A 

compute il "i2 

OSINCOS In AC. compute sin d or cos d 



Subroutines (continued) 

Calling Sequence 

CALL $QK.r2 
CALL $QL.r2 



External References 

SSE(FSE), $FSM, $NML, $EE 



DATAN 



In AC, compute arctan d 



CALL $FMS 


None 


CALL $FSM 




CALL $NML 


XDCO 


CALL X DDI, 12 


XOSU, XDCO 


CALL XDMU.f2 


XDAD. XDCO 


CALL XDAD,f2 


None 


CALL XDSUJ2 


None 


CALL XDCO 


None 


CALL $PC 


SSE(FSE) 


CALL SQS.r 




CALl $IC 


SSE(FSE), SEE 


CALL $HS,i 




CALL lABS.i 


$SE(FSE) 


CALL ABS.r 


$SE(FSE) 


CALL ISIGN, i2 


SSE(FSE) 


CAU SIGN.r? 


SSE(FSE) 


CALL $HN.i2 


SSE(FSE). $EE 


CALL $HM,i2 


SSE(FSE), SEE 


CALL $DSI.d 


SSTO.SDNO. $ZC, $ZK. $ZL 


CALL SDSIN.d 


SSE(FSE), SZM. SZN, AC 


CALL $DCO,d 


SDLO 


CALL $DCOS,d 




CALL SDAN 


SDLO. $STO. SDAD, 


CALL DATAN.d 


SDSU, IF. SSE(FSE), 




AC. SDMP, SDDI. 




POLY 
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Name 

DEXP 

DLOG 
POLY 



CHEB 



DSQRT 



$DFR 



IDINT 



DMULT 



Table 13-1. DAS Coded Subroutines (continued) 

Function Catting Sequence 

In AC, compute exponential d CALL SDEX 

CALL DLXP.d 



In AC. compute in d 



In AC, compute double-precision 
polynomial with t terms, 
coefficient list starting at 
address c, and argument at 
address y 

In AC, compute shifted 
Chebyshev polynomial series 
with t + 1 terms and coefficient 
list starting at address c 

In AC, compute square root 
of d 



In AC, compute fractional 
part of d 

In AC, compute integral 
pari of d 

In AC, compute dl "62 



DDIVIDE In AC. compute dl'd2 



DADDSUB in AC, compute dl+d2 with 
$DAD or dl - d2 with 
$DSU 



DNORMAL In AC. normalize d 
DLOADAC Load AC with d 



)STOREAC Store AC tn d 



RLOADAC Load A with double precision 
mantissa sign word from AC 



CALL DLOG.d 
CALL $DLN 

CALL POLY.t.c.y 



CALL CHEB.t.c 



CALL SDSQd 
CALL DSQR.d 



CALl SDFR.d 



CALL $DtT,d 
CALL IDINT, d 

CALL $DMP.d2 
CALL $ZM,d2 

CALL $DDI,d2 
CALL $ZN,d2 

CALL $OAD,d2 
CAL SDSU,d2 
CALL $ZK,d2 
CALL $ZL,d2 

CAIL $DNO 

CALL SDLO.d 
CALL $ZF.d 

CALL $STO.d 
CALL $ZSd 

CALL $ZI 



External References 

$DLO, $STO, 

SSE(FSE), AC, $DNO, $EE. 

$ZC, $2K, $ZL, $ZM. $ZN 

$DLO, $STO, $DNO, $EE 
$SE(FSE), $ZK. SZL, SZM, $ZN 

$DLO, $DAD, $DMP 



$DLO, SSTO, $DAD, 
$DSU, SDMP 



SDLO, SSTO, $DNO t 
$DAD, $DMP, $DDI, 
$SE(FSE), AC 

SDLO, $DNO, SDSU, 
$OIT, AC, $SE(FSE) 

$DNO t $SE(FSE) 



$DLO, $STO, $DNO, 
$DAD t AC. SSE(FSE) 

SDLO, SSTO. $DNO. 
SDSU, AC. $SE(FSE) 

$STO, $DLO, $DNO, 
AC, $SE(FSE), SEE 



$SE(FSE) 
AC, SSE(FSE) 

AC, SSE(FSE) 

AC 



SINGLE In AB. convert the d tn AC to r 

DOUBLE In AC, convert the r in AB to d 

DBLECOMP In AC, compute negative of the 
d in AC 



S3S 



Store AB in memory address m 



CALL SRC 


AC 


CALL SYC 


AC 


CALL SZC 


AC 


CALL S3S,m 


SSE 
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Table 13-1. DAS Coded Subroutines (continued) 



Name Function 

A2MT Translate in memory a character 

string of length n starting 
at s and ending at e from 
eight bit ASCII to six bit 
magnetic tape BCD code 

s is the start of the ASCII block 
and e ts the start of the BCD block. 

MT2A Translate in memory a character 

string of length n starting at 
s and ending at e from six bit 
magnetic tape BCD code to 
eight bit ASCII 

s is the start of the BCD block 
and e is the start of the ASCII block. 

EXIT Formats and executes an RTE 

EXIT macro 

SUSPND Formats and executes an RTE 

SUSPND macro with parameter i 

RESUME Formats and executes an RTE 

RESUME macro to resume task s 

ABORT Formats and executes an RTE 

ABORT macro to abort task s 

ALOC Formats and executes an RTE 

ALOC macro to call reentrant 
subroutine s 



Calling Sequence External References 

CALL A2MT,n.s.e None 



CALL MT2A,n,s.e 



CALL EXIT 
CALL SUSPNDO) 
CALL RESUME(s) 
CALL ABORT(s) 
CALL ALOC(s) 



None 



V$EXEC 

V$EXEC 

V$EXEC, $RTENM 

V$EXEC, $RTENM 

V$EXEC 



PMSK Formats and executes an RTF 

PMSK macro to operate on PIM 
il with line mask i2 and 
enable/disable flag \3 

DELAY Formats and executes an RTE 

DELAY macro with the 5 
millisecond count in il, the 
mmute count in i2, and delay 
mode tn i3 



CALL PMSK(ii, 
i2.i3) 



CALL DELAY(il 
i2,i3) 



V$EXEC 



V$EXEC 



LDELAY Formats and executes an RTE DELAY 

type 1 with additional parameters to 
specify the LUN from which the task 
(lun in i4 key in i5) is to be reloaded. 



CALL LDELAY (il.i2,i3, V$EXEC 
i4, i5) 



TIME Formats and executes an RTE 

TIME macro with the minute 
count in il, and 5-millisecond 
count in i2. 



CALL TIME0U2) 



V$EXEC 
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Name 

OVLAY 

SCHED 

SRTENM 
SEE 

$SE 



Table 13-1. OAS Coded Subroutines (continued) 
Function Calling Sequence 



Formats and executes an RTE 
OVLAY macro with il - to 
execute, t2 = to load, and 
s is the overlay .name 

Formats and executes an RTE 
SCHED macro with il - priority, 
\2 * wail flag. i3 * 
logical-untt number, si - key 
and s2 ~ task name. 

Moves the six character name 
from X to B 

Outputs error messages on 
the SO device 

Fetches n parameters from a 
subroutine call 



CALL OVLAYOl 
•2.s) 



CALL SCHED01, i2, 
i3.sl.s2) 



CALL SRTENM 
CALL SEE 



CALL SSE, n 
BSS n 



External References 
VSEXEC, SRTENM 

VSEXEC, SRTENM 



None 

VSIOC. VSIOST. 
VSEXEC 

None 



VSRSW 



Handles multi reel volume 
files and information 



VSHDR 



To format a standard 
VORTEX header 



LDA~LUN to 
unload. 

LDX<0 for 
no mount 

LDX - for 
mount next 
volume. 

LDX>0 addr 
of filename 
for mount 

B~next 
volume num- 
ber if X>0 

CALL VSRSW 

CALL VSHDR 
DATA page 
number ad 
dress 

DATA program 
name address 
DATA program 
title address 
( - if not 
used) 



A = Restored 



B « Restored 



X * Restored 



A.B.X restored 
Header in 38 
word external 
buffer VSHBUF 
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Name 
CB2A 



CA2B 



Function 

Covert a 16-bit binary value 
(positive or negative) to an 
ASCII character string (octal 
or decimal) with leading zeros 
suppressed and right justi- 
fied minus sign on negative 
decimal values. 



Convert a decimal or octal 
ASCII number (positive 
or negative decimal) to 
a 16-bit binary value. 



Calling Sequence 



LDA 



JSR 
DATA 



JSR 
DATA 



7-Sr-Vv 



,i 



,'A.M.vi l 






DATA 



for octal 
conversion 

for deci 
mal conver 
ston 
CB2A.X 
Address of 
binary value 

CA2B.X 
ASCII 
string ad- 
dress 
(compl - 
left byte, 
pos = right 
byte) 

Address of 
"termination 
character 
Mock 



External References 

(A) = Address of ASCII 

string 

(B) - Restored 



(A) = Binary value 

(B) = Next byte address 

OVFL« Set if an illegal 

character encountered 



The termination block 
format is 

DATA Legal termination 

character (right 

justified) 
DATA Legal termination 

character (right 

justified) 



MOVE 



CTIME 



Move a block of n words 
from address f to address 
t If an overlap move, 
then, move in reverse. 



Convert the time of day 
to an ASCII string of the 
form: 

HHMMSS 



DATA (end of block) 

JSR MOVf.X 
DATA n (word 

count) 
DATA f (from ad 

dress) 
DATA t (to address) 

JSR CTIME.X 



(A) = Restored 

(B) = Restored 



(A) 



(B) 



Address of ASCII 

string 
Restored 
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Name 

S9E 

CCOS 
CSIN 

CLOG 

CEXP 
CSQRT 

CABS 



Table 13-3. FORTRAN IV Coded Subroutines 

Function Catling Sequence 

Compute ACCZ*i CAIL $9E(i) 



In ACCZ, compute cos z 



In ACCZ, compute sin z 



In ACCZ, compute In z 



In ACCZ, compute exponential z 



In ACCZ, compute square root of z 



In AB compute absolute z 



CONJG 


In ACCZ. compute coniugate of z 


$AK 


Add r to real part of ACCZ 


SAL 


Subtract r from the real 




part of ACCZ 


SAM 


Multiply ACCZ by r 


SAN 


Dtvtde ACCZ by r 


SAC 


Convert AC to z and store in ACCZ 


CMPLX 


Load ACCZ with a value having 



a real part r\ and an imaginary 
part r2 

S8K Add z to ACCZ 

S8L Subtract z from ACCZ 

S8M Multiply ACCZ by z 



CALL CCOS(z) 
CALL CSIN(z) 

CALL CLOG(z) 

CALL CEXP(z) 

CALL CSQRT(z) 

CALL CABS(z) 

CALL CONJG(z) 
CALL SAK(r) 
CALL $AL(r) 

CALL SAM(r) 
CALL $AN<r) 
CALL SAC 
CALL CMPLX(rl,r2) 

CALL S8K(z) 
CALL S8L(z) 
CALL S8M(z) 



External References 

SSE(FSE), IABS, S8F, 
S8M. $8N, S8S 

SSE(FSE). CSIN, S8F, 
$8K. $8S 

SSE(FSE), EXP, SQN. 
SIN, SQK(FAD). $QM, 
COS, SQL(FSB), S8F 

SSE(FSE), ALOG, $QM. 
SQK(FAD), $QN, ATAN2. 
S8F 

SSE(FSE), EXP, COS. 
SQM. SIN. $8F 

SSE(FSE), SQRT. CABS 
SQK, SQN, $8F 

SSE(FSE), SQRT. SQM, 
SQK(FAD) 

SSE(FSE), $8F 

SSE(FSE), S8S, SQK(FAD), $8F 

SSE(FSE). $8S, SQL(FSB). S8F 

SSE(FSE), S8S, SQM. S8F 
SSE(FSE>. $8S, SQM. SBF 
$3S, CMPLX 

SSE(FSE), $8F 



SSE(FSE). S8S, SQK(FAD), S8F 

SSE(FSE). $8S. SQL(FSB). $8F 

SSE(FSE), $8S, SQM, 
SQL(FSB), SQK(FAD). S8F 
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Name 



Table 13-3. FORTRAN IV 

Function 



Coded Subroutines (continued) 

Calling Sequence External References 



$8N Divide ACC2 by z 

$2D Compute negative of z 

AIMAG Load A8 with the imaginary 

part of z 

$OC Load A8 with the real part of 

ACCZ 

REAL Load AB with the real part of z 

$8F Load ACCZ with z 

$8S Store ACCZ in z 

$XE Compute d* <; i where d is in AC 



$YE 



$ZE 



DLOG10 
DMOD 

DINT 

DABS 
DMAX1 

DMIN1 

DSIGN 

$YK 
$YL 

$YM 



Compute d r where d is in AC 



Compute dl d2 where dl is in AC 



DATAN2 tn AC, compute arctan (dl/d2) 



In AC. compute tog d 

In AC, compute dl modulo d2 



In AC, compute integer 
portion of d 

In AC, compute absolute d 

In AC. select the maximum value 
in the set dl. d2. .dn 

In AC, select the minimum value 
in the set dl. d2, ,dn 

Set the sign of dl equal to 
that of d2 

Add r to AC 

Subtract r from AC 



Multiply AC by r 



CALL $8N(z) 

CALL %ZO 
CALL AIMAG(z) 

CALL $OC 

CALL REAL(z) 
CALL $8F(z) 
CALL $8S(z) 
CALL $XE(i) 

CALi $YE(r) 

CALl $ZE(d?) 

CALL DATAN2(dl.d2) 

CALL DLOGlO(d) 
CALL DMOD(dl,d2j 

CALL DINT(d) 

CALL DABS(d) 

CALL DMAXl{dl,d? 
dn 0) 

CALL DMINl(dl ( d2 
dn,0) 

CALL DSIGN(dl,d2) 

CALL $YK(r) 
CALL $YL(r) 

CALL $YM(r) 



$SE(FSEj, $8S. $QM, 
$QK(FAD), SQN. $QL(FSB). $8F 

$8S, $8F 

$SE(FSE) 

$8S 

$SE(FSEJ 

$SE(FSE) 

$SE(FSE), $3S 

$SE(FSE), $ZF, MOD. $ZM 
$HN, $ZN, $ZS 

$SE(FSE). $ZS. DBLE. 
$ZE $ZF 

$SL(FSE), $ZS, DEXP, 
DLOG. $ZM 

$SE(FSE), $ZF. $ZS. 
$ZI, $ER. $ZN, 
$ZL, $ZK DATAN 

$SE(FSE). DLOG, $ZM 

$SE(FSE), DINT, %Zf . 
$ZN, $ZS. $ZM, 
$ZL, $ZC 

$SE(FSE), $ZF. $JC, $XC 



$SE(FSt). $ZF, $ZI, $ZC 

$SE(FSE). $ZF, $ZS, 
l$FA. $ZL, $ZI 

$SE(FSE), $ZF, $ZS, 
l$FA, $ZL. $ZI 

$SE(FSE). $ZF, $Z1. $ZN 



$SE(FSE). $ZS, DBLE, $ZK 

$SE(FSE), $ZS, DBLE, 
$ZL, $ZC 

$SE(FSE). $ZS, DBLE, $ZM 
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Table 13 3. FORTRAN IV Coded Subroutines (continued) 


Name 




Function 


Calling Sequence 


External References 


$YN 


Divide AC by r 


CALL $YN(r) 


$SE(FSE), $ZS. DBLE. 










%Zf. *ZN 


DBLE 


In 


AC, convert r to d 


CALL DBLE(r) 


$SE(FSE), $YC 


$XC 


In AC, convert i to d where 
i is in A 


CALL $XC 


$PC, $YC 


TANH 


In 


AB, compute tanh r 


CALL TANH(r) 


$SE(FSE), $QK(FAD). EXP, 
SQL(FSB), $QN 


ATAN2 


tn 


AB, compute arctan (rl/r2) 


CALL ATAN2(rl.r2) 


$SE(FSE), $ER. ATAN, 
$QK(FAD), $QL(FSB), $QN 


ALOG10 


In 


AB, compute log r 


CALL ALOGlO(r) 


$SE(FSE), ALOG. $QM 


AMOD 


In 


AB, compute rl modulo r2 


CALL AMOD(rl.r2) 


$SE(FSE), AINT, $QN. 
$QM, $QL(FSB) 


AINT 


In 


AB. truncate r 


CALL AINT(r) 


$SE(FSE) ( $IC. $PC 


AMAX1 


In 


AB, select the maximum value 


CALL AMAXl(rl.r2) 


$SE(FSE), l$FA. $QL(FSB) 




in 


the set rl.r2....,rn 


....rn.O) 




AMIN1 


In 


AB, select the minimum value 


CALL AMINI(rI.r2j 


$SE(FSE), t$FA. $QL(FSB) 




in 


the set rl, r2, .rn 


.rn.O) 




AMAXO 


In 


AB. select the maximum value 


CALL AMAX0{il,i2, 


$SE(FSE), I$FA. FLOAT 




in 


the set il.i2.....m and 


..m.O) 






convert to r 






AMINO 


In 


AB, select the minimum value 


CALL AMINO(tl.i2. 


$SE(FSE). I$FA. FLOAT 




in 


the set il.i2 in and 


in.O) 






convert to t 






DIM 


In AB, compute the positive 
difference between rl and r2 


CALL DIM(M,r?) 


JSE(FSE), $QL(FSB) 


FLOAT 


(n 


AB. convert i to r 


CALL FLOAT(,) 


$SE(FSE), $PC 


SNGL 


In 


AB, convert d to r 


CALL SNGL(d) 


$SE(FSE), $ZF, $RC 


MAXO 


In 


A, select the maximum value 


CALL MAXO0U2. 


SSE(FSE), l$FA 




in 


the set il.i2 in 


...m,0) 




MiNO 


In 


A, select the minimum value 


CALL MIN0(il,i2, 


$S£(FSE), l$FA 




in 


the set il,i2 in 


...,tn,0) 




MAX1 


In 


A, select the maximum value 


CALL MAXl(rl.r2, 


$SE(FSE), t$FA, $QL(FSB) 




in 


the set rl,r2, ,rn and 


..rn.O) 






convert to i 






MINI 


In 


A, select the minimum value 


CALL MINl(rl,r2. 


$SE(FSE), l$FA. $QL(FSB) 




in 


the set rl,r2,. ...rn and 


...rn.O) 






convert to i 






MOD 


In 


A, compute il modulo i2 


CALL MOD(il,i2) 


$SE(FSE), $HN. $HM 
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Name 



Table 13-3. FORTRAN (V Coded Subroutines (continued) 
Function Calling Sequence External References 



INT 

(DIM 

(FIX 
SJC 



In A, truncate r and convert 
to i 

In A, compute the positive 
difference between il and i2 

In A, convert r to i 

In AC, convert d to i and store 
result in A 



CALL INT(r) 

CALL IDIM(il,i2) 

CALL IFIX(r) 
CALL $JC 



$SE(FSE), SIC 

$SE(FSE) 

$SE(FSE), $IC 
$RC, $IC 



13.4 DECIMAL SUBROUTINE 

The decimal subroutine performs requested decimal 
operations (add, subtract, multiply, divide, move, or 
compare). Besides operand addresses and sizes, the user 
may specify preshifting of operands and post shifting and 
rounding of result. Note that pre shifting is decimal 
alignment and does not imply physical shifting. Operands 
may be signed or unsigned. 

Decimal compare sets the user result condition word as 
follows: 

- if operand A< operand B 
« 1 if operand A - operand B 

- 2 if operand A > operand B 



Decimal compare arithmetically compares two decimal 
operands. 

On entry register R0(A) contains the address of an 85 word 
temporary storage block available to firmware, Rl(8) 
contains the address of the user result condition word, and 
R2(X) contains the address of the users descriptive 
parameter block. Decimal math may be accessed either via 



or 



JMPN 

JMP 



VIDECM 
ODBCM 



If C$DECM is used, return will be made to user supplied 
location VCSRTN. If V$DECM is used, the user must still 
define VC$RTN. 



Parameter Block 

15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 

Word 
1 
2 
3 
4 
4 



CODE 


P 


LA 


UB 


LA 


LB 


BN A 


displacement A 


BN B 


displacement 




Q 


DA 


DB 


SA 


SB 




R 


UC 


DC 


LC 


SC 


BN C 






displacement 
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Paramtter Description: 



CODE 



represents operation to be performed: 










=» opA + opB 






1 


=» opA opB 






2 


= compare opA: opB 






3 


■• move opA to opB 






4 


- opA * opB 






5 


» opA/opB 


p 


at 


1 


for presence of word 3. 




3* 





for absence of word 3. 


UA 


SB 


1 


if operand A is unsigned. 




- 





if operand A is signed. 


UB 


«= 


1 


if operand B is unsigned. 




- 





if operand B is signed. 


LA 


« 


length of A in digits (1 to 31). 


LB 


* 


length of B in digits (1 to 31). 


BN A 


™ 


main storage base register number 
of operand A. 


BN B 


as 


main storage register number of 
operand B. 


Q 


™ 


1 


if returned in third operand 
(words 4 and 5 present). 




" 





if third operand not present 
(words 4 and 5 absent). 


DA 


am 


1 


pre shift operand A left 




- 





pre shift operand A right 


DB 


- 


1 


pre shift operand B (eft 




- 





pre shift operand B right 


SA 


- 




Operand A shift amount 


SB 


« 




Operand B shift amount 


R 




1 


if rounding to be applied to 
result (only if result returned 
in third operand) 




"* 





if rounding not applied to 
result 


UC 


MS 


2 


if result unsigned 




- 





if result signed 


DC 


«, 


1 


to shift result left 




» 





to shift result right 


LC 


« 




length of result field 


sc 


» 




result shift amount 


BN r 


SB 




main storage base register 
number of result 



Displacement 
A, B, or C 



Error Conditions: 



Byte count used to calculate 
byte address of decimal operands. 



(Note that on an error, register R2 will be incremented past 
the parameter block, and results will be unreliable.) 

a. Result operand overflow if the result operand has an 
inadequate number of digits to contain the result, the 
condition result word (CONDIT) will be set to the 
value 3. 



b. Invalid digit if the number portion of a digit (bits 2 3 
2 ) contains a value other than ■ 9 t0 or the zone 
portion (bits 2 7 2*) contains a value other than 11, , 
the conditions result word will be set to the value 4. 
This is also true of values specified as signed having 
signs other than blank (octal 240), minus (octal 255), 
or plus (octal 253). 

c If the base word related to respective BN field is zero 
then the condition result word CONDIT will be set to 5. 

d. Attempted division by zero results in CONDIT being set 
to 3. 



Notes 

If operand C is not specified, the result will be returned in 
operand A, except for move. Decimal move moves operand 
A to operand B. Note that for a decimal move, the 
parameter block may be a maximum of 4 words. In this 
case, the Q bit is used to specify rounding, rather than a 
third operand. 

Parameter byte addresses are calculated as follows: (Rl -+■ 
1 + BN) *2 + displacement ~ byte address of least 
significant byte of decimal operand. 

This represented pic tori ally as follows: 

Rl 



► Condition Word 



Base register 
address 



Base register 1 
address 



Base register 15 
address 



Optional 



Word Address 
byte 



Byte Address Sign 
decimal 



* 



•+*■ 



displacement operand 

When pre-shifting is specified, this does not imply physical 
shifting of operands. Only the operand designated for 
result is modified by a decimal operation. 

When the operation is complete, only the integrity of 
register R2 and Rl are maintained. R2 will be incremented 
to the address of the next word following the parameter 
block. 

This is meant to imply all other V75 registers are volatile. 
The user must save and restore any registers R3 through 
R7 he requires to be maintained when executing the 
decimal operation. 
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Examples: 

Note: The following may be used to create decimal 
parameter blocks: 

FOLLOWING ARE FORMS OF DECIMAL 
INSTRUCTION 



DWORD 


FORM 


3, 


- 1 , 11,5,5 


DWORD 1 


FORM 


4, 


, 12 


DWORD2 


FORM 


4, 


, 12 


DWORD 3 


FORM 


3, 


,1.1,1,5,5 


DWORD 4 


FORM 


3, 


. 1, 1,1,5,5 


DWORD5 


FORM 


1, 


. 12 



DECIMAL OPERATION MACRO (DECIMAL 
PARAMETER BLOCK) 



DECOP 


MAC 




IFT 




GOTO 




DWORDO 




GOTO 


DECWD1 


COUNT 




DWORDO 


DECWD2 


CONT 




DWORD 1 




DWORD2 




IFF 




GOTO 




DWORD 3 




IFF 




GOTO 




DWORD4 




DWORDS 


DECWD3 


CONT 




EMAC 



P(12)-P(13)-P(5)-P(6)+P(14) 

DECWD1 

P(7) ,0,P< 1 ) ,P(3> ,PU) ,P( 11 ) 

DECWD2 

P(7) , 1 ,P( 1 ) ,P(8) ,PU) ,P( 1 1 ) 



Select appropriate Word 
(Note no third, fourth, 
or fifth word) 



(Parameter block includes 
at least word 3) 



P<2),P(3) 

P<9) ,P( 10) 

P( 12)+P( 13)+P< 5)+P(6)+P( 14 ) 

DECWD3 

0,P( 1U)P(5) ,P( 12) ,P(6) ,P< 13) 

Pt 14) 

DECWD3 

0,P(15),P(16),P(20),P(19),P(21) 

P( 17 ) ,P( 18) 



(Terminate if no word 3} 



(Terminate tf no third 

operand words 4 and 5"i 



INTERPRETIVE PARAMETER BLOCK DF FINED AS FOLLOWS 



P(01 ) 


OP1 


SIGNED (S) OR UNSIGNED (U) 


P(02) 


OP1 


REG 


P(03) 


OP1 


DISPLACEMENT 


P(04) 


OP1 


LENGTH 


P<05) 


OP1 


SHIFT LEFT (L) OR RIGHT (R) 


P(06) 


OP1 


SHIFT AMOUNT 


P(07) 




OPERATION (DADD. DSUB, SMI 
DMOV, DCMP) 


P(08) 


OP2 


SIGNED (S) OR UNSIGNED (U) 


P(09) 


OP2 


REG 


P( 10) 


OP2 


DISPLACEMENT 


P( 11) 


OP2 


LENGTH 


P< 12) 


OP2 


SHIFT LEFT (L) OR RIGHT (R) 


P( 13) 


OP2 


SHIFT AMOUNT 


P( 14) 


-EQ 


IF RESULT IN THIRD OPERAND 


P( 15) 


F 


FOR ROUNDING 


P( 16) 


OP3 


SIGNED (S) OR UNSIGNED (in 


P( 17) 


OP3 


REG 


P( 18) 


OP3 


DISPLACEMENT 


P( 19) 


OP3 


LENGTH 


P(20) 


OP3 


SHIFT LEFT (L) OR RIGHT (R) 


P(21 ) 


OP 3 


SHIFT AMOUNT 



DDIV. 
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followtng are equates to be used with the above macro 



BNO 
BN1 

BN2 

BN3 

BN4 

BN5 

BN6 

BN7 

BN8 

BN9 

BNA 

BNB 

BNC 

BND 

BNE 

BNF 

DADD 

DSUB 

DCMP 

DMOV 

DMUL 

DDIV 

EQ 

F 

R 

L 

S 

U 



equ o base: number 

EQU 1 BASE NUMBIR 1 

EQU 2 BASE NUMBER ? 

EQU 3 BASE NUMBER 3 

EQU 4 BASE NUMBER 4 

EQU 5 BASE NUMBER 5 

EQU 6 BASE NUMBER 6 

EQU 7 BASE NUMBER 7 

EQU 8 BASE NUMBER 8 

EQU 9 BASE NUMBER 9 

EQU 10 BASE NUMBER 10 

EQU 1 1 BASE NUMBER 11 

EQU 12 BASE NUMBER 12 

EQU 13 BASE NUMBER 13 

EQU 14 BASE NUMBER 14 

EQU 15 BASE NUMBER 15 

EQU DECIMAL ADD 

EQU 1 DECIMAL SUBTRACT 

EQU 2 DECIMAL COMPARE 

EQU 3 DECIMAL MOVE 

EQU 4 DECIMAL MULFtPlY 

EQU 5 DECIMAL DIVIDE 

EQU 1 RESUL1 RETURNED IN C 

EQU 1 ROUND (ADJUST) 

EQU SHIFT RIGHT 

EQU 1 SHIFT LETT 

EQU SIGNED 

EQU 1 UNSIGNED 



The above macro may be used as follows 

1 . DECOP U , BN 1 , 2 , 4 , R , 1 , DAD , U , BN2 ,0.4,11 

generates four word parameter block 

16204 
10002 
20000 
02041 



Explanation: Operand A is an unsigned decimal string 
residing in memory accumulator 1 It begins (most 
significant digit) two bytes into accumulator 1 with a length 
c>1 four bytes Operand A will be logically reshifted right one 
digit Operand B is an unsigned decimal string beginning 
in memory accumulator 2 with a length ol four bytes. 
Operand B will be logically pre shifted left one digit The 
result of addition will be returned in operand A If operand 
A - 4310 and operand B = 0129. result of the above 
operation would be 1721 



ROt A) 
R 1 (B) 
R2 (X ) 



Before Operation 

10 16 

3 100 

4 102 



After Operation 

1016 
3100 
4106 



2. DECOP U f BN5, 0, 4 , , , DMUL , S, BNE, , 3, , , 
EQ,F,U,BN1 ,0, 7,R, 1 
generates six word parameter block 

114203 
050000 
160000 
010000 
014341 
010000 

Explanation; An unsigned 4 digit decimal string in memory 
accumulator 5 is multiplied by a signed 3 digit decimal 
string in memory accumulator 14 The result will be right 
shifted one digit position, rounded, and stored in memory 
accumulator 1 {note maximum resulting digit string length 
is 7) If operand A - 0321 and operand B = 987 + result 
of above operation would be 0003168- 



Note following register settings: 
Before Operation 



R0( A) 
RKB) 
R2(X) 



1200 
1 105 
3506 



After Operation 

17 00 
1 105 
3514 



3 . DECOP S , BNC ,0,3,,, DCMP , S , BN 1 , , 4 

generates three word parameter block 

040144 
150000 

010000 

Example 3 compares decimal digit string in memory 
accumulator D with decimal digit string in memory 
accumulator 1 If operand A = 123 + and operand B = 
98/1 , condition word pointed to by R1(B) would be set to 
20 



Note following register settings 
Before Operation 



Note following register settings 



R0(A) 
R1 (B) 
R2(X) 



13012 

6512 

1234 



After Operation 

13012 

6512 

1237 
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SECTION 14 

REAL-TIME PROGRAMMING 



VORTEX real-time applications allow the user to interface 
cttrectty with special devices, develop software that is 
interrupt-driven, md utilize reentrant subroutines. Four 
areas are cove r ed in this section: 



Interrupts 

Task-scheduling 

Coding reentrant subroutines 

Coding I/O drivers 



14.1 INTERRUPTS 
14.1.1 External Interrupts 



(PIM) hardware: A PIM com- 
prises a group of eight interrupt lines and an eight-bit 
register. The register holds a mask where each set bit 
disarms a line. VORTEX allows up to eight PIMs for a 
maximum of 64 lines. The system of PIMs and lines is 
called the wtmml interrupt system. 

The processing of external interrupts is controlled by the 
programmed status of the line. The lines are continuously 
hardware-scanned, regardless of the status. 

If more than one interrupt is detected on a single scan, the 
highest-priority line is acknowledged, and, if the PIM is 
enabled and the tine armed, the interrupt is taken. 11 no 
conflict occurs, the lines are acknowledged on a first in/ 
first-out basis. If a signal is received on a disabled PIM, it 
is stored by the PIM, and causes an interrupt when the 
PIM is enabled. 

Disabling the external interrupt system prevents any 
interrupt from entering the computer. Enabling the entire 
system aHows acknowledgement of alt interrupts. Enable/ 
disable selection on a PIM basis allows for more selected 
control of the system. Individual line selection prevents 
receiving a second interrupt while a line is sttH processing 
tf*e first 

Program setting of WM registers causes the PtM to ignore 
interrupts race**** on lines that are busy processing an 
interrupt or held off because of priority. 

AM PIMs and interrupt lines to be used in VORTEX are 
specified at system-generation time and thek status 
specified when VORTEX is loaded and inifiattasd VORTEX 
does not cHsaWe any tine unless so directed by RTE service 
request PMSK (section 2. 1 .6). 



selected memory location: Under VORTEX, PIM addresses 
are from OiCX) to 0277. Linkage to VORTEX interrupt- 
processing routines is accomplished by a jump-andmark 
instruction in the interrupt location. Unspecified lines are 
preset in VORTEX with no-operatkm instructions that 
ignore unspecified or spurious interrupts. 

Since VORTEX always includes memory protection, certain 
instruction sequences cannot be interrupted and acknowl- 
edgement is delayed until they are complete. These include 
the instruction following an external control, halt, 
tion, or any instruction manually executed in step mode. 



VORTEX interrupt Nne handlers: At system-generation 
time, a user specifies all interrupt-driver tasks . These 
include those that allow VORTEX to service the interrupt, as 
well as those that are directly connected and service the 
interrupt themselves. Then, VORTEX constructs a line 
handier for each interrupt in the system (figure 14.1). 

Directly connected routines preempt VORTEX and are thus 
used only when response time demands it. Section 14.4.5 
describes directly connected interrupt handlers in detail. 

Common interrupt handler: The common interrupt han- 
dler is the interface between PIM interrupts (via the line 
handlers) and system or user interrupt-processing tasks. 
Upon entry, the contents of the volatile registers are saved 
and the interrupt event word is inclusively ORed into the 
event word of the specified TIDB. A check than datarminas 
whether to return to the interrupted task or to enter th e 
jnterrupt-processinff ta sk, d epending upon priority . All 
interrupts are enabled upon leaving the common interrupt 
handier. 

Interrupt-processing tasks: A task is activated by an 
interrupt when: (\ ) task's TIPS interrupt expected status 
&LbJ8& (2) the interrupt event word contains a nonzer o, 
and (3) the task is suspended . 

The interrupt-processing task can be memory resident or 
RMD-rssident, In either case, the processing task clears the 
event word. The event word distinguishes different inter- 
rupt lines that could activate the same task. The dispatcher 
clears the interrupt expected bit and time delay active for 
all tasks except TTY and CRT drivers. 



An interrupt 
following options 



task can exit with one of the 



$han a Pm interrupt signal is acknowledged and the 
interrupt taken, the computer executes the instruction in a 



a. Issue a suspend RTE (type I or 2) service call that 
suspends the task and sals the interruptexpected 
status bit. U pon receiving the external JnterruDl_or 
simulated interrupt (TBEVNT word in TIDB is set to 
if causecfby IOC or I/O completion events (type 2 
only), the task continues execution following the 
request. 
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HgJiL-TIME ^Giw^iSUNG 



Dedicate i«v*?r'is?t Adtir&ases 



Line Handlers 



TIDS$ 



A&Jr#ss 

OiOO 

i 

0102 

3 



0104 
0105 



twr^ji&M&rk tostruc-") j 



(or :; directly con 
^:; .ftsi interrupt) 









^gtfarit Snstnic 
tint H@Hdier 2 



&\ '-'? >^r«ctl3r eon- 



Option 2 



OiO& 
0107 



tM^-:w 3 ^ft^'fe£ir& afistruc- 



I Jum^- and* Mark InstFiact&n 



[ 3o Cpenwwn interrupt Hauler 
jTidBJLocatten 




LJJgJj^-J^ggM..... . I 

| Juntp-and-9kftarfc Instruction ~] 

j to Comm wi Interrupt Bag^l^r 



! t vm$ Word 



TI0H Location 



s 



^ ORed 

Ui ^3 



« &eiurn Ad&ess 



Lfflsabie Ciocfs instruction 
' Jump- and-&tsrk Instruction 

! 4c User Coc^ 



"i vent word 



I Interrupt Stack: 
'A, B, X, Ci'. r>, 
j ane: $^ acfc_gO!ntaffj 

[Thread Word ! 



I Return &M?m% 



m&h Clock Instruction 



: Jump-artd.lSark instruction 

j U VSDHD 

f \feer Code Entry Address 



r 



Note: 3«e sectta I4.4JS on dflrectiy-conaected Interrupt 

hend^*. 

?^Ci 14-1, interri^t Line rlang&rs 



Event Word 



! interrupt Stach: 
' A, » ( X, Or, P. 
and Stack Pointer 



•| User Code lor 
j Directly 
I Connected 
I Interrupt Task 



V$OHD, system 
routine to save 

volatile renters 



User code 



b. 



Sssua a de^;- Ff 
suspends -&s i.*** 
Umenjetey s*rU,$3 
whan time-sfete;* 
interrupt or ■& **r 
\/0 aom@&im& ( 

Upon *?»«% V,< 



■"£ (type 2 or 3) servte© cal! ths: 
end sets £he trttemipt-€xp£»*§ e^d 
hiatus feet*. The task is ra^tN&t^d 
si^res or up^n roedgat of *£&ra«l 
mutated Interrupt caysad feMOC $r 
;/p© 3 onfy). 
event word r&n-zero %v$lzg&& 



interm act&yfc*"* by external or simuiatad &t@m*£t 
(J). Sine* K30 m the TIDB event word to s l f t&a 
•vent w»«ii irs m& handfm $©r ex|gm«a| Inl*7mpt8 
should be saft *& ^mathing other than liti type 3 
delay is to b& m&± The ^ord a^o deer* &« tinra- 
detey sts&s &H &£on reactivation, 
it shottSd a^ao b® nvtod that lor ^^^and (t^@ 2) and 
<iatey (ty|>3 S) m^c& cails, l>#^ of TBPl wwd of 
task's TID© m i%; & causa ^CX to sat T^VNT w^d to 
1 on I/O cftmpHsfcn ©^nt^, TNs felt is rm*t ^hmmm 
g suapefi^ cs- ?.*ci^y sarviet cal! m s typa o®m then 
the ones er^ntii^id 



and cai €K^ 



-, *3t the ^tamipt-^tpactod elato feit 
' t€ rateas® apace. (TID8 m£k b^ 



Tisi^ng C^^^8f®t^?»: The time necessary fr process an 
mtonrupt t?Erough the common interrupt hanc^ deperfds 
on wh^i tha interrupt occsjrrod: 

a. If a imk is mterruptod and thi interrup>processing 
tss^ h®§ a lower priority, the interrupt is posted, &rrt 
VORTEX returns control to the interrupted task in 
approglmstaty 56 cycles. 

b. if g i&$k is mterrupted and the intern^ -processing 
tsm has a rusher priority, the interrupt is posted/and 
VWTEX transfers control to tha dispatcher (section 
14^3) to start the h^har-priortty interrupFt-process- 
Ing task (if ^ its condStions are mat). Tha posting 
time is 66 cycles, approximately. 

c. If an interrupt occurs during a dispatcher scan, the 
posting time is about 32 cycles. VWTEX returns to the 
dispatcher to restart tha scan. 

a. H the real-time dock interrupts the interrupt handfer, 
the RTC interrupt handler posts the interrupt and the 
common interrupt handler returns to the clock 
pr oce ss or in approximately 40 cycles. 
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14.1.2 Internal Interrupts 

VORTEX recognizes and services internal interrupts related 
to various hardware components. The processing routines 
are all directly connected and are the highest-priority tasks 
in the system. 



down sequence must have occurred or else a fatal error 
condition is assumed to have occurred and VORTEX halts 
with the I register set to 077. 



protection eiterrupt: Memory protection interrupts 
are generated when a task attempts to execute a privileged 
instruction such as external control or halt or attempts to 
violate the access mode. The memory protection routines 
process aSi protection violation interrupts which are the 
highest priority interrupts in the system. When the 
interrupt occurs, the system is forced to the executive 
mode, state (see table 11). Section 1.3 describes the 
memory map concept and the access modes which can be 
assigned to each virtual 



VOflTEX uses the memory protection interrupt for switch- 
ing from the user mode to the executive mode when an I/O 
(section 3} or RTE (section 2) request is made. 

The memory protection interrupt addresses for the various 
violations are shown in table 14-1. 

Table 14-1. Memory Protection Interrupt Addresses 



Error 

HALT 



Interrupt Map Active 

Address Access Control Status 

020 Attempt was made to execute 

HALT instruction. 



I/O 022 A map number other than 

attempted to execute an I/O 

instruction. 

WRITE 024 Attempt was made to write 

into read-only or execute- 
only location. 

JUMP 026 Attempt was made to jump 

into read operand only 
location. 

UNASSIGNED 030 Attempt was made to read 

or write into unassigned 
location. 

INSTRUCTION 032 Attempt was made to fetch 

FETCH instruction from read 

operand only location. 

Power faaave/reefert Interrupt: An interrupt occurs when 
the system detects a power failure. The VORTEX power 
failure processor saves the contents of volatile registers and 
the status of the overflow indicator, sets a power failure 
nag, and halts with the I register set to 077. 



Following the power up sequence, the PF/R hardware 
generates an interrupt. Upon entry to the VORTEX power, 
up procesor, the power faBure flag is checked. A 



If a power-down sequence had occurred, the power-failure 
flag Is cleared, the RM mask registers are set, the real- 
time clock's variable interrupt interval is set, the saved 
volatile registers »• restored, the clock and PIMs are 
enabled (if enabled upon interrupt), and control is 
returned to the location before the interrupt. Any input or 
output data transfers in operation at the time of the power 
failure result in the toss of data. 

For peripheral devices such as magnetic tapes and RMDs, 
the I/O operation Is automatically retried. 

For other peripheral devices, such as the card reader, 
paper-tape system, card punch and lineprinter, a retry is 
not attempted. 

The error message posted depends upon the error detected 
by the respective I/O driver, such as abnormal BIC stop, 
parity error, interrupt time-out, etc. Data losses on the 
RMO due to power failure could cause VORTEX to 
malfunction, but other devices which are not system 
resident are recoverable. 

The power failure-restart routines operate at the second 
highest priority level in the system, which has memory 
protection at the highest priority level. 

The power-up routine reloads the volatile memory map 
registers by scanning the TIDB thread and outputting the 
map image for each task which has an assigned, non 
checkpointed map. Each task's map key number is 
contained In TBKEY and the map image adddress con 
tained in TBMING. 

The power-up routine also automatically reloads the 
writable control store for systems with WCS. Sections 
20.1.3 and 20.1.4 describe the manner in which the 
microutility task saves the WCS image in the OM library file 
named WCSIMG and how the WCS reload task, WCSRLD, 
utilizes the file to restore the WCS content The power up 
routine checks location 017 to determine if WCS has been 
loaded. A zero value indicates no WCS. A non-zero value is 
assumed to be the WCSRLD TIDB address. The R library 
logical unit number and protect key are stored in TBRSTS 
and the WCSRLD TIDB (resident TIDB, nonresident task) 
is set active. 

Real-time clock interrupt: The real-time clock interrupt 
provides the basis for timekeeping in VORTEX. It can be set 
to a minimum resolution of 5 milliseconds. However, a 
value greater than 5 milliseconds (i.e., 10-20 milliseconds) 
reduces overhead when the system does not have high- 
resolution timekeeping requirements. Upon receipt of an 
interrupt, the time-of-day is updated and the TIDBs are 
scanned for any time-driven task requiring activation. PIMs 
are disabled for approximately 18 cycles during realtime 
clock mterrupt-processing. The clock routine is the third 
highest priority interrupt in VORTEX. 
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^E&L-Ti&g momMtmrnQ 



14.1.3 Interrupt-?* 

tnsteiiatta 



siting Task 



14.2 SCHEDULING 



To install an inte^^prccsssing task that is not directly 
connected, alsistoi^it ^tion tima provte^ line handjars 
and re sident TIDBs fr; ^s|ng„a PIM. jdif @ctiv« (s ection 
| 15.J U1) with U^ i^£iLAjmE-dtoMfim reacting 1&6.2) 
' using the same task *■ • ! - *--"- -"---**--- - 



f dummy TSOBs csr? 



■*e in bc#s directives. Additional 

fded during system gsnerat&n. 

j (One® a TIDB is if* the s^tem, OPCOM dative ;ATT£CH 

| can be used to connect di^ersnt interrupt processing tasks 

to an interrupt line) 

Then, code the inittr^t-^desssing task ar>*d add the tmk 
via system generate te &» VORTEX nucleus as a raskfent 
task. 



Then, use the ; ATTACH directive to link the resident task to 
the interrupt line (i: PtM tractive not ussdV 



14.2.1 System Flow 

VORTEX is designed around the TIDB (table 14-1). This 
block contains all of the information about a task during 
its locution. The setting and dealing of status bits in the 
TIDE causes a task to flow through the system. Two 
register stacks are saved within the TIDB: a reentrant 
(suspend register) stack, and an interrupt stack. 

The dispatcher (section 14.3) is the prime mover of ia$k$ 

through the system, qfo en any function has rea ched a 

termination point or has to. wait for a n l/fll^itgn^ 

task gives control to thedis j>atcrie r, which then finds 

another tasnto execute . A taaJTmaintairts control until it 

giv es^control to the dispatcher , o r to the interrupt task if 

the~m^ru^*processinfl tasiTha^ a h^h^ pri^ The 

| contents of die interrupted task's volatile registers are 

j saved in its TIDB interrupt stack and control goes to the 

| dispatcher, which searches for the highest-priority active 

I task tor execution. 



a. 



14.1.4 Interrupt Sfcsfes 

When a fnembry-proife&t*?, realtime (RT) dock or PM 
interrupt occurs, xm %mmt is forced to the exesuthaa 
mode, state 0. Th$ toterr^yts are ^tabled or disable! m 



Msmary-frotftttion Interrupt 

1 . RT dock iu unnffected and remains in the en^^d 
state. 

2. Memory protection is disabled and is enabled prm 
to exiting th# mmm}?~ protection processing routine 
(EXC 0646). 

3. PIMs am 4mm®4 when the Jffl>M instruction *s 
executed and PS Ms sea enabkJ prior to exiting (EXC 
0244). 

PIM Interrupt 

1 . RT dock h ur*£7fected and remains m the ensMed 
state. The commc*i interrupt line handler routine 
disables and m^m the RT dock. The clock to not 
enabled if the mm interrupted out of the RT c^ook 
processor ($m mcMm 14.4.5 lor dir^tiy conn@ci«d 
interrupt handlers) 

2. Memory p-rete&tfcn is unaffected and remains in 
the enabled state. 

3. PIMs are disabled when the JMPM instruction is 
executed. The oomtaeh interrupt line handler routine 
enables the Pim i^m^ exiting. 

RTOock interrupt 

2. The RT dock processor disables and resnabtes tlie 
RTciock. 

2. Memory protection is unaffected a=id remains !n 
the enabled state. 

3. The PlMs^radfss&led when the JMFM instruct^n 
is executed. The m deck processor ena&as the ftMs. 



Each TIDB is placed in sequence by priority ievai and 
threaded. Two stacks are maintained in the system: a 
busy stack and an unused stack. When a task is scheduled 
for execution, a TIDB is allocated from the unused stack 
and threaded onto the busy stack according to priority 
level. 

The status word of each TIDB, starting with the highest 
priority task, is scanned. Depending upon the setting of 
status bits, the task is activated, passed over, or made to 
activate a related system task. 

Two resident system tasks are activated by the dispatcher 
to process functions relating to the execution of a 
task: (1) search, allocate, and load (SAL), art (2) 
common system errors (ERROR). SAL searches, allocates, 
loads, and exits a scheduled task. ERROR posts common 
system error massages. These two tasks are not reentered 
once they start execution, so the dispatcher holds tasks 
requiring identical functions until they are completed. 
Then, the highest-priority waiting task is given control of 
the required function. 

In VORTEX, SAL assigns a map (1-15) to each non-resident 
task scheduled to be executed. If a map is not available, 
SAL: (1) checkpoints any executing background task's map 
(memory Is checkpointed as required only); (2) checkpoints 
a lower priority foreground task's map; or (3) checkpoints a 
higher priority foreground task's map (if TBST bit 8 Is set); 
or (4) exits and doss not execute the task until a map 



Each map defines a logical memory space of 32K words 
which is segmented into 512-word pages (see section 1.3). 
SAL sets each logical page to one of four access modes: 
unass&ned, read only, read operand only, or read-write. 
Each logical page which is assigned an access mock, other 
than uriasstgned is Hnked to a physical page of memory. If 
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interrupt 
(logical 
P»8*0, 
14-1. 



is violated by the executing task, a 
interrupt occurs. The memory protection 
proce ssi ng is described in section 14.1.2. Page 
0-0777) is always assigned to physical 
is the system data region as defined In table 



Each task, foreground or background, executes within its 
own logical memory space. The amount of logical memory 
space available to a task is reduced by: (1) pegs for 
system data; and (2) the VORTEX nucleus module accessed 
by the task and mapped into Its logical memory (see 
section 2.2). If none of the VORTEX nucleus module is 
accessed, the task has a vail ab le aH but one page (page 0) 
of the 32K logical memory space. Each task is loaded and 
executed from logical address 01000. Section 1.3 describes 
in greater detail available logical memory 



SAL allocates physical memory by pages. SAL maintains a 
table designating the atlocatabmty of each physical page 
within the system as defined during system generation. 

if space is not available and the background is in 
operation, the background task is cheekpointed on the 
RMD checkpoint fee and its space allocated to foreground. 
Upon release of this space by the foreground tasks, the 
background is read in from the RMD and reactivated. 

If space is required to toad a program and the background 
has already bean cheekpointed, the task waits for a 
currently running task to exit and release memory. 

A task may dynamically request more memory space via 
the ALOCPG and MAPIN RTE requests. Sections 2.1.15 and 
2.1.17 further describe these RTE requests. 

The background memory allocation depends on the size of 
the background task being loaded. Only the amount 



needed is so allocated automatically, although the JCP/ 
MEN directive can allocate extra memory for a background 
task. Figure 14-2 is a VORTEX memory map of map 0, 
figure 14-3 shows the priority structure, table 14-2 is a 
description of a TIDB, and table 14 3 is a detailed 
description of lower memory. 



14.2.2 Priorttet 

Thirty-two priority levels (0 through 31) are provided in the 
VORTEX system. Levels 2 to 31 are reserved for protected 
foreground usuaga. Level 26 is reserved for SALg. Level 25 
is reserved for the two" VORTEX system tasks , S AL and 
ERRQp. Levels 24 and 2 3 are reserved fo r I/O drivers. All 
other foreground levels are available to trw user. More than 
one task per level can be scheduled. 

Levels 1 and are reserved for tasks running in the 
background attocateble memory and residing in the 
background library. Lava* 1 is reserved for VORTEX system 
J£2*S£l«U8S* •*., the JotKOfttrol processor. thtJoad- 
the FORTRAN compiler , th e PAS MR 
These tasks run with memory profocjj pn 
disabled , and can be cheekpointed when their space is 
needed by a foreground task. Level tasks cannot modify 
or destroy the system (figure 14-3). 

Only one background task can be active and in memory at 
any given time. If other background tasks have been 
scheduled, the active background task must execute an 
EXIT service request before the scheduled task(s) can be 
loaded and executed. If a background task calls EXIT and 
no tasks are scheduled for the background area, and the 
requesting task is not the job-control processor, the JCP is 
scheduled. Otherwise, there is a normal exit. 
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Address 

512 



interrupt Location and System Pointers 
Background Literal Pool __^_____ 



n 



AJSocsstadle 
Memory 

Pool 



M-7K 



M= 

Highest 
Memory 
Address 



Nonresident Background Tasks 



Nonresident Foreground Tasks 



I Resident Foregrcand User Tasks 
! and Subroutines 



System Common 

Reentrant Stack 

System and Unused TIDBs 

Line Handlers 

Common iret@rrupt Handler 

Dispatcher 

Executive CaU Handier 

Reat-Tirm Ciock 

Memory Protection Processing 

Power Failure /Restart 

Real-Time Executive Services 

SOC 

Drivers 

System Tasks {SAL and ERROR) 



Protected 
memory 

Unprotected 
memory is 
allocated 
starting at 512 

Protected 
memory is 
allocated 
starting from 
high memory 



Protected 
memory 



If a configuration increases memory, the ailocatable 
memory poet would ino-oase and resident routines would 
reside in a higher position in memory. 



* 7K is enough room for the minimum VORTEX nucleus 
components, plus four empty TIDB's and three I/O drivers. 
Users with more I/O devices or a greater number of TIDB's 
will need more than SK. 



Figure 14-2. VORTEX Memory Map 
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Foreground 

Priority 

Levels 



Background 
Priority 

Levels 



Priority 
Level 



3t 



26 



25 



24 



23 



22 



11 



System Task SAL2 



VORTEX System Tasks SAL and ERROR 



Driver Tasks (Uw)Speed Devices) 



Driver Tasks^HigJi-Speed Devices) 



Operator Communication Task 



VORTEX System Protected Tasks 



User Unprotected Tasks 






^ ^U\M 



'^U 



Figure 14-3. VORTEX Priority Structure 



14-7 



RgAt-Ttsig ^mmmmma 



Symbol 



Wor<£ 



Bitt 



TBTRO 





?©ST 


\ 


TSPL 


2 


'8£VNT 


3 


TiRSA 


4 


T8RS6 


5 


T8RSX 


6 


TSRSP 


7 


T8RSTS 


8 


TWENTY 


9 


T3TMS 


SO 


TBTMIN 


11 


TSISA 


12 


T3IS6 


13 


73ISX 


14 


Y3ISP 


15 


TSiSRS 


16 


7SIO 


17 


T3KN1 


18 


7SKN2 


19 


THKM3 


20 


T8TLC 


21 


TMCPTH 


22 


T&ATSK 


23 


TSRSE 


24 


TSSIZ 


25 


T&NUCI 


26 


TIMING 


27 


TOST 


28 


Ti*tSR3-TS8SR7 


2*33 


•mmzms*? 


34-34? 



15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



Task Thread 



Task Status 



Task Status 



Priority Level 



Interrupt Event 



A Register (Reentrant and Suspension Stack) 



8 Register (Reentrant and Suspension Stack) 



X Rogister (Reentrant and Suspension Stack) 



0? |P Register (Reentrant and Suspension Stack) 



Temporary Storage (Reentrant and Suspension Stack) 



Task Entry Address 



Time Counter - Clock Resolution Increments 



Time Counter - Minute Increments 



A Register (Interrupt Stack) 



B Register (Interrupt Stack) 



X Register (Interrupt Stack) 



OF 



P Register (Interrupt Stack) 



Reentrant Stack Address (Interrupt Stack) 



No. of I/O 

Requests Threaded 



No. of I/O 
Requests Active 



Task Name 



Task Name 



Task Name 



First Address in AHocatable Memory 



Background Task Queue 



Address of Scheduling TIOB 



Task Error Code 



Task Site 



Nucleus Module 

indicators 



Unused 



Unused 



Map 

Key 



Map Image Address 



Interrupt Status 



#75 Registers (reentrant and suspension stack) 



¥75 Registers (Interrupt stack) 



•Words 29 through 38 are present only H the V75 flag was 
set at SYS6EN »nd the task had a long TIDB created. 

Figure 14-4. TIDB Description 
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Tan 


to 14-2. TtOB Description 


Key: 










SyiHDOl 


WOTQ 


Bits 


Set - 


Description 


TBTRO 





1M 


Task thread 


Points to next TIDB in 
chain. V$T8 points to the 
highest-priority active task. 
Last TIDB on queue has *ere 
TBTRD. 


TBST 


1 


15-0 


Task status 


See table 15-5. 


TBPL 


2 


15 


Task opened 


Bit sat when SAL has 



14 



13 



12 



Long TIDB 



Load overlay 



Background 
checkpoint 
I/O wait 



opened task but not 
loaded it (memory not 
available). 

Bit set if V75 SYSGEN and task had 
a long TIDB created. Ten words are 
allocated at the end of TIDB tc save 
extra registers. 

RTE overlay request 
made by task with 
overlay name in user 
request. 1 - overlay load. 

Foreground task wait- 
ing for background I/O 
to complete so it can 
be checkpoints to make 
allocataMe memory 
available. 1 - yes. 



11 



Allocation 
override flag 



bits 9 and 12 
of TBPL and bit 5 of 
TBST. When FNIS routine 
of SAL releases memory 
and/or a TIDB, sets bit 
11 for tasks having bits 
9 and 12 of TBPL and bit 
5 of TBST sat SAL then 
tries to allocate memory; 
nor scheduler, a TIDB. 
1 - override. 



10 



Background 
being check- 
pointed 


Background task being 
written on checkpoint 
file. 1 - yes. 


TIDB not 
available 


Schedule request made 
but no TIDBs available 




for allocation. The task 




is suspended until one 
available. 1 * TIDB 




not available. 



Task waiting for available 
map. 1 * map has been 
assigned to task. 
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ftysnbei Wostf 



Table 14-2. Tl&i Description (corttfrnjed) 
BHs Set m Description 



T8EVMT 3 



50 



15-0 



7BRSA 



re^sa 



TBRSX 



BRSP 



15-0 



15-0 



15-0 



15 



T8RSTS 8 



14-0 



15-0 



Delay type 
3 request 



Task priority 
level 



Interrupt 
ev&nt 



TBEN7Y 9 



15-0 



A register 
(reentrant 
and suspen- 
sion stack) 

3 register 
(reentrant 
and suspen 
ston stack) 

X register 
(reentrant 
and suspen- 
sion stack) 

OF (overflow) 
register (re- 
entrant and 
suspension 
stack) 

P register 
(reentrant 
and suspen- 
sion stack) 

Temporary 
storage 
(reentrant 
and suspen- 
sion stack) 

Task entry 



Task map checkpoint. 1 « 

task's map has been checkpointed. 

Set by RTE when a delay, type 3 
request is made. Cleared by IOC 
upon completion of I/O request. 

Specifies priority level 
(0-31) of task to be exe- 
cuted. 

Matches bits in interrupt- 
handler calling sequence. 
Interrupthandler event 
inclusively ORed into TiDB 
word 3 when processed by line 
handler. If a bit sets 
while status bits 3 and 14 
are set, dispatcher 
activates task. Clear 
event word before exiting. 

IOC and RTE calls store 
volatile register contents 
in this stack (words 4-8). 



Absolute address of first 
executable data of a task. 
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14*2. TIOB Description (continued) 



Symbol 


Word 


Bits 


Set - 


TBTMS 


10 


15-0 


Time counter 
(clock reso- 
lution incre- 
ments) 


TBTMIN 


11 


ISO 


Time counter 
(minute in- 
crements) 


rmsA 


12 


15-0 


A register 
(interrupt 
stack) 



TBtSB 13 



TBISX 14 



TBISP 15 



150 



15-0 



15 



B register 
(interrupt 
stack) 

X register 
(interrupt 
stack) 

OF (overflow) 
register (inter- 
rupt stack) 



Description 

Words 10 and 11 indicate 
time left before execution. 
(Clock routine increments 
both words when bit 6 or 
7 is set in status 1.) 



Words 12 16 store volatile 
register contents during 
interrupt by higher-priority 
task. (Upon reactivation, 
words 12- 16, volatile reg- 
ister contents, and reen- 
trant stack pointer are re- 
stored and execution is 
continued.) 



14-0 P register 

(interrupt 
stack) 

TBISRS 16 150 Reentrant 

stack pointer 

(interrupt 

stack) 

TBIO 17 15-8 Number of Incremented by IOC when 

I/O requests I/O request is received, 

threaded and decremented upon com- 

pletion. (A task cannot 
exit or abort until counter 
is zero.) 



TBKN1 



16 



70 



15-0 



Number of 
active I/O 
requests 



Task name 



Incremented by IOC when 
it sets an I/O driver ac- 
tive, and decremented upon 
completion. 

First two characters of 
six-character task name. 
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TaMe 14-2. TIOB Description (continued) 



TBKN2 
TBKN3 

ratio 



19 



20 



21 



Bits 


Set - 


150 


Task name 


15-0 


Task name 


15-0 


First address 




in altocatabte 




memory 



T8CPTH 22 



15-0 



Background 
task queue 



T8A7SK 



TERSE 



23 



24 



15-0 



15-0 



wmz 



25 



TBHUCL 



26 



15-10 



9-0 



15-8 



Description 

Second two characters of 
six-character task name. 

Final two characters of 
six-character task name. 

Points to first address 
allocated for use by task. 
After a task has been loaded, 
SAL save the read-only page 
number and number of pages 
in TBTLC as described for 
TBNUCL, bit 12. 

Any background task wait 
ing to be loaded in back 
ground altocatable memory 
is queued through this 
word. (A running back- 
ground task can schedule 
other background tasks, 
but cannot load them 
until space is available.) 



Address of 


Stores this address, and 


scheduling 


upon EXIT or ABORT (if 


task's TIOB 


bit 1 of TBST set) reac- 




tivates scheduling. 


Task error 


Upon error, system rou- 




tines store error codes 




here and set error status 




bit (4 of TBST). ERROR 




routine decodes and prints 




message. 


Task size 


Number of pages of memoi 




to be allocated to task. 


Reserved for 




future use 




Nucleus 


Bit 8 reserved for future 


indicator 


VORTEX use. 



Bit 9 whet) set indicates 
map foreground blank 
common in task; read- 
write access mode. 
Bit 10 when set indicates 
map nucleus table module 
in task; priority tasks 
are mapped with module 
set to read operand only. 
All other priority tasks 
are mapped with the module 
set to read-write access 
mode. 
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Table 14-2. TIM Doacrfptlon (continued) 



Symbol 



Word 



Brte 



Sot 



Description 



Bit 11 when set indicates 
map global FC8 in task; 
this module is mapped read- 
write access mode. 
Bit 12 when set indicates 
map pages read-only 
specified by LMGEN. Read 
only pages have been 
designated during load 
module generation. The 
logical page number and 
the number of pages are 
set in the load module 
pseudo TIDB and temporarily 
stored in TBTMIN bits 15-8 
and bits 7-0 respectively. 
After the task is loaded in 
memory, the page numbers 
are stored in TBTLC, SAL 
sets the specified pages 
to read-only access mode. 



7-4 



Reserved for 
future VORTEX 
use 



TBKEY 



26 



3-0 



Key 



Task map key. This is the 
map number (0-15) assigned 
to the task by SAL or SGEN. 



TBMIMG 27 15-0 Map image Address of task map image. 

This is the map logical 
address of the task's map 
image. Normally it would 
be immediately following 
the task's TIDB. 



TBIST 



28 



15-0 



TBRSR3 



29 



TBRSR4 


30 


TBRSR5 


31 


TBRSR6 


32 


TBRSR7 


33 



15-0 

150 
15-0 
150 
150 



Interrupt 
status 



V75 register 
3 (reentrant 
and suspension 
Stack) 

V75 register 4 

V75 register 5 

V75 register 6 

V75 register 7 



Bit 15 is if VSKEY to be 
set to zero and is 1 if 
V$K£Y to be set to TBIST 
(bits 3-0). 

Bits 14-0 are the map status 
as input from hardware. 

IOC and RTE call store 
volatile register contents 
in this stack (words 29-34). 
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Tab*® 14-2. TtOB Description (continued) 



Symbol 


Word 


Bits 


Set * 


Description 


TS1SR3 


34 


15-0 


V75 register 3 


Words 31-35 store volatile 
register contents during 
interrupt by higher 
priority task (see descrip 
tion of TBISA). 


TSISR4 


35 


1 5-0 


V75 register 4 




TBISR5 


36 


150 


V75 register 5 




TS*SR6 


37 


15-G 


V75 register 6 




TB;SR7 


38 


15-0 


V75 register 7 





Tatoto 14-3. Map of Lowest Memory Sector 

M&mm Symbolic Hwm Description 

00-01 CPU interrupt code (preset to NOP) 

Q2-01& Unassigned: available to the user 

016 Unassigned. Reserved for future VORTEX II use 

017 TIDB address for WCS reload task 

02CO&2 Memory protection interrupt: halt 

(jump-and-mark to VSMPER) 

022,023 Memory protection interrupt: I/O 

(jump-and-mark to V$MP3) 

024,025 Memory protection interrupt: write 

(jump-and-mark to V$MP2) 



026,027 Memory protection interrupt: jump 

(jump-and-mark to V$MAP2) 

030,031 Memory protection interrupt: unassigned 

(jump-and-mark to V$MAP1) 

032,033 Memory protection interrupt: instruction 

fetch (jump-and-mark to V$MAPE) 

034,037 Reserved for future VORTEX II use. 

Jump-and-Mark to V$MPI0 to ignore 
spurious interrupts 

04C ; 041 Power-down interrupt (jump-and-mark 

to VSPFDN) 
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A*#«ss 

042,043 

044,045 

046 



Tatta 14*. 
symDunc 



V$CRDM 



047 


V$JCTM 


050-053 


V$JNAM 


054 


VSLCNT 



•f Lowest Mem ory Sector (continued,) 
Description 

Power-up interrupt (jumpand-mark 
to V$PFUP) 

Variable-interval interrupt address 
(jump-andmark to V$CLOK) 

Keypunch (0 « 026, 1 - 029): 
Bit SGEN nominal keypunch 

Bit 1 Set to 1 (if V75 system) 

Bit 8 Current keypunch specified by JCP 

/KPMODE directive (/JOB, /FINt, or 
/ENDJOB resets the current value to 
nominal value) 

JCP Temporary Storage 

Eight-character job name 

Line count (set by a JCP /FORM 
directive): used by DAS MR assem- , 
bier and FORTRAN compiler to deter- 
mine the number of lines printed 
before a top of form is issued. 



055 



VUCFG 



056-067 



V$BIC1 



070-073 


VSOATE 


074 


vrncT 


075 


V$BGLB 


076-077 





JCP flags: 




Bits 15-10 


Number of extra mem- 




ory blocks to be 




allocated with back- 




ground task (cleared 




after loading) 


Bits 9-5 


Unused. 


Bit 4 


Dump flag if load and 


Bit 3 


Dump flag (if set, 




the background dumps 




after a normal EX ST 




or abortion) 


Bits 2-0 


Load and-go flags 



BIC in sequence (maximum 8). See section 
14.4.6 for a description of VORTEX II use 
of BtCs and BTCs 

Eight-character date set up by 
OPCOM directive ;DATE t mm/dd/yy 

Permanent line count set up at 
system-generation time 

Protection code and logical unit 
number of the BL unit 

FPP (Floating-Point Processor) 
interrupt (jump and mark to V$FPP) 
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AtidraSS 

0100-0117 

0120-0137 
0240-0157 
0160&77 

0200*0217 
0220*0237 
0240-0257 
0260-0277 

0300 



Table 14-3. Slap of Lowest Memory Sector (continued) 
Symbolc Name Description 



0301 



0302 



0303 



0304 



V$CTL 

V$CPL 
V$CRS 

V$TB 
V^UTB 



oso5 



0306 



0307 



0310 



VSPTVB 
WLRS 
V$LRSK 
V$CKPT 



PIM jump-and-mark to individual 

tine handlers. Unassigned lines are set 

to JMPM VIMPI0 to ignore spurious interrupts 

PIM 1* jump-and-mark to individual 
line handlers 

PIM 2* jump-and-mark to individual 
line handlers 

PIM 3* jump-and-mark to individual 
line handlers 

PIM 4* jump-and-mark to individual 
line handlers 

PIM 5* jump-and-mark to individual 
line handlers 

PIM 6* jump-and-mark to individual 
tine handlers 

PIM 7* jump-and-mark to individual 
line handlers 

Address of currently executing task 
TIDB (0177777 - dispatcher, 037, - 
realtime clock routine) 

Priority level of currently executing 
task 

Address of current reentrant stack 
(zero if the currently executing 
task is not executing a reentrant 
subroutine) 

Address of highest-priority TIDB 
in the active stack 

Address of dynamically allocated page. 
If zero, no page yet allocated. This 
is the top of the thread for pages allocated 
for dynamic memory allocation as required 
for TIDB space, I/O request, etc. 

Address of next entry in reentrant 
stack 

Address of first location of re- 
entrant stack 

Address of last location of re- 
entrant stack + 1 

Checkpoint flag (set if background 
checkpointed) 
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Table 143. Map of 


Address 


Symbolic Name 


0311 


VSOPCL 


0312 


V$LSAL 


0313 


VILER 


0314 


V$TJCP 


0315 


V$BTB 


0316 


V$NPAG 


0317 


V$LLUP 



0320 

0321 
0322 
0323 
0324 
0325 
0326 
0327 
0330 



0331 

0332 
0333 



V$IM 



V$MAP 



V$BTBM 

VSGFCB 
V$MIMG 



Lowest Memory Sector (continued) 
Description 

Address of T1DB tor OPCOM task 
Address of TtDB for system SAL task 

Address of TIDB for system ERROR 

task 

Address of TIDB for JCP task 

Address of current active back 
ground task TIDB (zero if no back- 
ground task active) 

Number of available physical pages 
remaining in WAGE for allocation 

Logical address specifying the end 
of the execution background tasks 
allocated memory space 

Interrupt mask for PtM (0 - enable, 
1 = disable) (bit - line 0) 

Interrupt mask for PIM 1 

Interrupt mask for PtM 2 

Interrupt mask for PIM 3 

Interrupt mask for PIM 4 

Interrupt mask for PIM 5 

Interrupt mask for PIM 6 

Interrupt mask for PIM 7 



t 



Map key availability flag word. Bit 
« map 0, bit 1 - map 1, etc. 
A zero indicates that the map is un- 
available for assignment, a 1 - 
map is available for assignment 

Base address of nucleus table module. 
Top of nucleus table module defined 
by V$GFCB 

Base address of global FCBs 

Map image address 
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0334-0337 



Table 14-3. Map of Lowest Memory Sector (continued) 
Symbolic Name Description 



G340 

034 1 

0342 
0343 



0344 



0332 

0353 
0354 

0355 



V$ST0, V$STI, 
V$ST2, V$ST3 



VSKEY 
V$CRDR 

V$TBGT 

V$TMS 



V$TMN 



0345 


V$LUNT 


C345 


V$0PCF 


0347 


V$FGLB 


0350 


V$FREE 


0351 


V$CTMS 



v$scv 

V$LPP 
V$CRM 

V$DST8 



FUNCI word for executive mode states 
0, 1,2, 3. Used by map tasks to 
switch executive mode states. See 
section 1.3 for description on the 
use of V$STO>V$ST3. These words are 
set up by the dispatcher. Bits 0-3 are 
set to the map number In TBKEY. If 
the task has been interrupted, the 
map number in bits 03 of TBIST ts 
used 

VORTEX currently executing map key 

Address of resident directory. See 
section 14.4.8 

Top of thread of background tasks 
waiting for allocation 

Time of-day in 5-millisecond incre 
ments (fractions of a minute stored 
in this word; upon reaching 1 -minute 
V$TMN increments, V$TMS resets). The 
range is to 12000. 

Time-of-day in minutes (full minutes 
up to 24 hours stored in this word; 
upon reaching 24 hours (24 x 60 
minutes). V$TMN resets). The range is 
to 1440. 

Address of logical-unit name table 

OPCOM lockout flag (busy) 

Protection code and logical unit 
number of the FL unit 

Reserved for future VORTEX use 

Clock resolution in 5-millisecond 
increments (user-specified milli- 
second interrupt rate/ 5) speci 
tied at system-generation time 

Selected clock count (1 to 4095) 
([user-specified millisecond 
interrupt rate] x [1000/V$CKB]) 

Pointer to last tested word in V$PAGE 

Clock resolution increments for frac 
tions of a minute in 5-millisecond 
increments 

Address of DST block 
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Table 14-3. Map of 


Address 


Symbolic Nemo 


0356 


VSUT 


0357 


V$PGT 


0360 


V$CTA0 


0361 


VSSCTL 


0362 


V$NCTR 


0363-0372 


V$PIMN 


0373-0374 


JUMP V$IOST 


0375 


V$SLFG 


0376 


VSERFG 


0377 


VSJOP 


0400 


V$LUT1 



0401 



0402 



0403 



V$LUT2 



V$LUT3 



V$1MIN 



Low** t Memory Sector (continued) 
Description 

Last address in background literal 
pool 

Address of V$PAGE, physical page 
availability mask. 

Base address for controller address 
table 

Current controller in scan 

Number of controllers 

External device address table for 
PIMs 

VORTEX II link for IOC STAT CALL 

System SAL task busy flag (I ~ busy) 

Error task busy flag (1 - busy) 

JCP operating flag (1 * busy) 

Starting address of logical unit 
table for JCP/OPCOMassignable 
logical units (1 100) 

Starting address of logical unit 
table for unreassignable logical 
units (101179) 

Starting address of logical-unit 
table for OPCOM-assignable logical 
units (180-255) 

Clock constant set up by SGEN where 
VS1MIN • 32767 - (60000/(5 *V$CTMS)) 

+ 1 



0404-0405 


JUMP V$IOC 


VORTEX II link to IOC 


0406.0407 


JUMP VSEXEC 


VORTEX II link to RTE 


0410 


VSIOA 


I/O algorithm 


0411 


V$CKIT 


Clock interrupted PIM before it 
could be locked out (common inter 
rupt handler and clock-processor 
flag) 



0412 



VSJCB 



Address of 41-word JCP buffer (all 
system background programs and JCP 
input directives into this sytem buffer) 
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Tabid 14^3. Msp of Lowest Memory Sector (continued) 
Address Symbolic Name Description 

0413 VIOCB Address of 41-word OPCOM buffer 

(OPCOM reads operator key-in re- 
quests into this buffer; if JCP 
is not active and a slash record 
is read, OPCOM moves the directive 
to V$JCB before scheduling JCP) 

3^4 V$BVN Bottom of VORTEX nucleus. SGEN sets 

to virtual address. Initializer sets to 
page number 

Bottom of foreground blank common 

Top of foreground blank common, 
top of VORTEX nucleus core 

Maximum RMD partitions per unit in system 

Zero word 

Bit mask contents 0000001 

Bit mask contents 0000002 

Bit mask contents 0000004 

Bit mask contents 0000010 

Bit mask contents 0000020 

Bit mask contents 0000040 

Bit mask contents 0000100 

Bit mask contents 0000200 

Bit mask contents 0000400 

Bit mask contents 0001000 

Bit mask contents 0002000 

Bit mask contents 0004000 

Bit mask contents 0010000 

Bit mask contents 0020000 

Bit mask contents 0040000 
Bit mask contents 0100000 
Bit mask contents 0177776 
Bit mask contents 0177775 
Bit mask contents 0177773 



0415 


V$BFC 


04I6 


V$TFC 


0417 


V$PST 


0420 


ZERO 


mzi 


BSO 


0422 


BS1 


0423 


BS2 


0424 


BS3 


0425 


BS4 


G426 


BS5 


C^27 


BS6 


0430 


BS7 


0431 


BS8 


0432 


BS9 


&£3 


BS10 


0434 


BS11 


04-35 


BS12 


0436 


BS13 


0437 


BSS4 


0440 


BS15 


0441 


BRO 


0442 


SRI 


0443 


BR2 
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Table 14-3. Map of Lowest Memory Sector (continued) 


Address 


Symbolic Name 


Description 


0444 


BR3 


Bit mask contents 0177767 


0445 


BR4 


Bit mask contents 0177757 


0446 


BR5 


Bit mask contents 0177737 


0447 


BR6 


Bit mask contents 0177677 


0450 


BR7 


Bit mask contents 0177577 


0451 


BR8 


Bit mask contents 0177377 


0452 


BR9 


Bit mask contents 0176777 


0453 


BRIO 


Bit mask contents 0175777 


0454 


BR11 


Bit mask contents 0173777 


0455 


BR12 


Bit mask contents 0167777 


0456 


BR13 


Bit mask contents 0157777 


0457 


BR14 


Bit mask contents 0137777 


0460 


BR15 


Bit mask contents 0077777 


0461 


NEG 


Bit mask contents 0177777 


0462 


LHW 


Left-half word mask (0177400) 


0463 


RHW 


Right-half word mask (0000377) 


0464 


THREE 


Data word (000003) 


0465 


FIVE 


Data word (000005) 


0466 


SIX 


Data word (000006) 


0467 


SEVEN 


Data word (000007) 


0470 


NINE 


Data word (000011) 


0471 


TEN 


Data word (000012) 


0472 


BM17 


Bit mask word (000017) 


0473 


BM37 


Bit mask word (000037) 


0474 


BM77 


Bit mask word (000077) 


0475 


BM177 


Bit mask word (000177) 


0476 


BM777 


Bit mask word (000777) 


0477 


BM1 777 


Bit mask word (001777) 


0500-0777 




Background literals and pointers 
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14.2.3 Timing Considerations (Approximate) 

Real-time clods mlerrupt processor: At each incrementa- 
tion of the real-time clock, there is a TtDB service scan 
requiring 



+ 8y + 7z cycles 



where 



x ^ 48 when the scan interrupts the 

dispatcher, or 63 when it interrupts a 
task and must establish a reentrant 
stack and store the contents of the 
volatile registers 

y is the number of TIDBs searched 

z i% the number of tasks having time- or 

schedule-delay status bits set 

The dock interrupt is disabled during the execution of the 
clock processor, and PIM interrupts are disabled for 26 
cycles following the initial entry of the dock processor. 

Dispatcher intermit processor: The time required to 
begin execution of a task through he dispatcher is a 
function of the number of TiOBs searched before execu- 
tion. The ttmg roquw&i to begin execution of the nth task is 



t + 14u + 17v + 12w + 18x +25y + 2 



where 



is 17 or 25, depending on the entry to 
the dispatcher 

is the number of tasks with task- 
suspended bits (TBST bit 14) set 

is the number of tasks with events 
expected but event word reset 

is the number of tasks with error bits 
(TSST bit 4} set but error task busy 

is the number of tasks with either task- 
aborted (TSST bit 13) or task-exited 
(TBST bit 12) set but I/O not completed 

is the number of tasks active but not 
leaded 

is one of the following values: 

107 to activate the ERROR task 

1 10 to activate the SAL task on aborting 

or exiting 

1 14 to activate a loaded task that is not 

suspended, or to activate the SAL task to 

load the requested task 

104 to activate an interrupted, 

suspended task 

62 to activate a task when the event 

word is set and the interrupt suspended 



Search, allocate, and load: 

Load processing requires, for a foreground task 
852(k) + v(k) + w(k) + x + y + ny 

where 

k is the cycle time 

v is the nucleus module required by the 

task and is 28 + A + B + Ccycles 

where 

A is 28 + 8 times the sure 
of common, in pages 

B is 81 cycles as an average 
for the nucleus table module 

C is 11 + 11 times the number 
of specified read-only pages 

x is the time to process an OPEN request 

y is the time to read an RMD record 

(pseudo TIOB) 

ny is the time to read a task from RMD into 

memory (variable depending on RMD 
device and task size) 

w is the page allocation 45 + 35 times the 

task size, in pages 

For a background task, load processing requires 
945(k) + v(k) + w(k) + x + y + ny 

where 

k is the cycle time 

w is the page allocation and is 45 + 35 

times the task size, in pages 

v nucleus module required by task and is 

28 + A + B + C 

where 

A is 53 cycles (global FC8 

module) 
B is 81 cycles (average, 

nucleus table module) 
C is 11 + 11 times the number 

of specified readonly pages 

x, y and ny are as defined for foreground task. 
Resident task load processing requires 

(533 + 9(x) + y)k 
where 

k is the cycle time 

x is the task size, in pages 
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is the nucleus module required by task 
48 + A + B+C + D 



A is 28 + 8 times the size 

of common, in pages 
8 is 53 cycles for global FCB 
C is 81 cycles for nucleus 

table module 
D is 11 + 11 times the number 

of read-only pages 



14.3 REENTRANT SUBROUTINES 

The user can write a reentrant subroutine and add it to the 
VORTEX nucleus. RTE service requests ALOC and OEALOC 
interface between a task and a reentrant subroutine. 



Two tasks make ALOC cads to RSUB. RSUB reserve? six 
words of altocatabie memory with the sixth word as 
temporary storage, the A register (reentrant stack) returns 
a value to the catting task. If task A is on priority level 5 
and task B is on level 6, RSUB running on level 5 is 
in t err up ted and the level 6 task B executed. This, In turn, 
makes an ALOC request and executes RSUB. RSUB then 
executes to comp le tion before RSUB on level 5 can be 



bXampeu 



JAZ 



c Ou^>\ ^ 



Llr 



Task A 
RSUB 



A task calls a reentrant subroutine via an ALOC request 
that allocates a variable-length push-down reentrant stack 
with the external name VSCRS. The reentrant subroutine 
address is specified in the ALOC calling sequence. The first 
word of the reentrant subroutine contains the number of 
words to be allocated. 

A reentrant stack generated by the ALOC request has the 
format: 



BND 



ALOC 
JAZ 



Task B 
RSUB 



to 
n + 5 



A Register 




B R*jt«t6r 




X R«gtstor 


OF 


P Register 


Point* to Pravioua RoontrMit Stack 


AvailaMfl tor Reentrant Subroutine! 


• 


• 


• 


* 




V75 Rtgi»*w* 3-7 



Ftx«d 
Sizo 



Firtd 
Stzt 



When writing a reentrant subroutine, ensure that the entry 
location contains the number ( £5) of words to be 
aftocaterf, ex ecution s tarts at the address (entry address + 
t% and the? MMRS'Oontatfts the reentrant*stack address. 

t4olOCorRTCcemeje^>tO€ALCK:canbenu^whrtein« if 

sllMc* reouest %T return control to the catting teak. ' 
06*100 r aliases the reehtrant stack, restores the A, B, 
and OF i sglHsr con ts rrto , and returns control to the 
address fe U e wl ng the ALOC request tyUaaiaaxejKi&ej; 
is avattattQ for «* reentrant eutwoutlna m*r. W * <H^ 
fnaeaieM m nunwanirsnt lack. 

Parameters or pointers can be passed to the reentrant 
subroutine m the A and/or B (and V75 if present) registers, 
as well as in-line after the ALOC macro. 



RX U- 


BND 






/•A,., . 


Reentrant Subroutine 


<jy$cgj 

RSUB 


MAMI 

BQU 

DATA 

LDX 

• 


RSUB 
0302 

eft 

VSCRS 


Allocate six word 
Stack fone temporary 

toeatjojQ) 




• 
STA 

• 


5, 1 


Save A in temporary 
storage 


^ 


• 
LDA 


5, 1 


Get temporary storage 
value 






fi* 



4> 



STA 



DBALOC 



0,1 



Modify return in A 




Return to location 
following ALOC call 



BND 
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, 14.4 C0D2N0 AH I/O DRiVER 

The iOC (sectior, 3} activates I/O drivers. When a user task 
makes an I/O rwqum, it executes a JSR 04O4,X instruc- 
tion. IOC then smkm validity checks on the parameters 
specified in the roquet* block (RQBLK) that immediately 
follows the JSR wistmctton. IOC queues RQBLK to the I/O 
driver controller ta&e (CTBL), and activates the corre- 
sponding contr&ler^a TIDB. The TSQB contains the 
entry address for tfm I/O driver. To determine the proper 
CTBl and corresponding TiOB, IOC obtains the logical-unit 
number from RQBLK. By referring to the logical-unit table 
(LUT), IOC then finds the device assigned to that logical 
unit. Each devtca has a device specification table (DST) 
associated with it, and each DST has a corresponding 
controller table . 

Ir, VORTEX at! RQBLKs are moved to map dynamically 
allocable space. Upon completion of the i/O request, IOC 
moves the RQBLK to the requesting tasks logical memory. 

14.4.2 i/O Tabtes 

Not ali the data discussed in this section are required for 
coding every special-purpose driver, but it is presented to 
provide maximum flexibility in defining driver interfaces. 

When an I/O driver is entered, it has the data, system 
pointers, and table address necessary for the I/O driver 
processing. At s^temganeration time, additional working 
storage space can be assigned to the i/O driver bb an 
extension of the controller table. The data available are: 

a. V$CTL (lower-memory system symbol defining the 
current TID3) * address of* TIDB associated with the 
I/O drimr controller table. 



b. TBRSTS (word 8 ©f controller TIDB) 
controller table CTBL 



address of 



Within CTBL, the following: 

(1) CTIDE (word 0) - controller TIDB address 
(V$CTt) 

(2) CTDS"? (word 3) - address of DST 

(3) CTRQBK (word 4) - address of RQBLK to be 
processed ^ 

(4) CTDVAT (word 6) - controller device address 

(5) CTSTAT (word 8) ~ temporary storage available 
for driver 

(6) CT8ICB (word 9) - address containing assigned 
BIC address (e.g. f 020.022) 

(7) CTFCS (werd 10) - FCB or DCB address for I/O 
request specified in CTRQBK (word 4) 

(8) CTWDS (word 11)- contains, upon exit, number 
of words transferred 

(9) CTSTS2 (word 13) - number of words per RMD 
sector 

(10) CTTKSZ(wordl4) - number of sectors per RMD 
track 

(11) CTPST0(word*5) - base address of the RMD for 
unit on this control 

(12) CTPST1, CTP5T2, and CTPST3 (words 16, 17, and 
18) - PSTaddressesforunitsl,2,and3 



d. Device specification table (DST): 

(1) DSUNTN(bitsl3andl4ofword2) * number (0- 
3) of this device on its controller 

(2) DSPST1 (bite 6-10 of word 2) - RMD partition 
number ( 1 -20) used to access the PST 

e. Request block (RQBLK): Contains user task I/O 
request information. The address of RQBLK is 
contained in CTRQBK (word 4 of the conta&er table). 
Word 1 of RQBLK contains the operation code in bits 
8*11 and the mode specification in bits 1214. Word 
bits 6- 14 contain the status. 

f. File control block (FCB): The FCB is used for RMD 
devices. CTFCB contains the address of FCB. 

(1) FCRECL (word 0) - record length 

(2) FCBUFF(wordl)- user buffer 

(3) FCACM(word2) - bits 8- IS, access method, and 
bite 0-7. protection code 

(4) FCCADR (word 3) - current record number 
(relative within file) 

(5) FCCEOf (word 4) - current EOF record number 
(relative within partition) 

(6) FCIFE (word 5) - beginning-of-fise record 
number (relative within partition) 

(7) FCCFE (word 6) « end of fite record number 
(relative within partition) 

(8) FCNAM1, FCNAM2, and FCNAM3 (words 7, 8, 
and 9) - file names in ASCI I 

g. Data control block (DCB): The DCB is used for non 
RMD devices. CTFCB contains the address of DCB. 

(1) OCRECL (word 0) - record length 

(2) DCBUFF (word 1) - user buffer 

(3) DCCNT (word 2) - function count 

h. VSCTL, TIDB. CTBL, DST, and the RQBLK reside in map 
0. The FCB and DCB reside in the user's logical memory 
and to access the data, the I /Q, drivers must switch to 
the proper executive mode state (see section 2.3). 



14.4.2 I/O Driver System Functions 

Each I/O driver under IOC performs certain system pre- 
and post- processing functions. 

Pre-Mtorrupt processing: The I/O driver must switch 
executive mode states to fetch or store data fcom user 
mode (see section 13). If the I/O driver uses a BIC, the 
driver cads V$8IC with the X and A ragjpjsm set to the 
initial and fine* buffer addresses respectfcer? to build and 
execute the initial BIC transfer instruction. If me BIC is 
shared, the Interrupt line handler is modified to the proper 
interrupt event word setting (TBCVNT) and TIDB address. 
VSBIC performs this modification if the word immediatel y 
following the call (JSR VS8IC.8) is noraoro, since this is 
assumed to be the interrupt event word setting , ff If 'Is zero? 
no mm hands* modffleatton is perfanned. The I/O driver 
clears the interrupt event word (TB€WTy*i ft* controller 
TIDB Immediately preceding a DELAY (type 2>ca«L To wait 
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tor an interrupt, the I/O driver executes a DELAY (typa 2) 
call with a time-out Tha raturn to the driver, either from a 
time-out or interrupt is to tha address immediately 
following the CAN. The contents of tha X register is not 
restored following a DEIAY can but the A and B registers 
are. Executing a TXA immediately preceding and a TAX 
following the DELAY caM X restores the value in tha X 
register 

Interrupt precessieg: The driver clears the time-delay flag 
(TBST bit 6) set by tha DELAY call, and checks TBEVNT to 
determine if an interrupt occurred (TBEVNT « indicates 
a time-out). Following the interrupt processing, the driver 
clears TBEVNT and calls DELAY (typa 2) for tha next 
instruction. 

Post-interrupt processing (no errors): Upon the completion 
of interrupt processing, the driver sets the status bits (5 
14) of RSTPR (word 0) in RQBU, and enters the number of 
words transferred in CTWDS. Tha driver then relinquishes 
control and exits to IOC by executing JMP V$FNR. 



Post-interns?* processing (errors): If an error is encoun- 
tered during interrupt processing, the driver sets the status 
bits (5-14) of RSTPR, according to the type of error . Tha 
flrwor then sets the A rogftter tp wo if tha unit is not 



rojlrty , n ei tiv e if there is a parameter «rror nr posit s 
there is a hardware error. Finally, the driver exits to the IOC 
error routine by executing JMP V$ERR. 



14.4.3 Adding an I/O Driver to the System File 

System-generation directives: T he following directive! 

•CtifflM&?aJtorJ»iteajs^^ 

TjDJLI /O driver entry jpcati on, DST,~PST, and the PIM line 

handler (section 15): ------ 

Directive Description 

EQP DSTs are generated by SGEN, one for 

each unit specified by the EQP directive. 
All DSTs generated for a controller point 
indirectly to the controller table 
specified by EQP. The pointer is to the 
entry name in the controller table 
assembly. 

PIM A PIM directive is required for each PIM 

Nne where an interrupt is expected. The 
PIM directive causes the system 
initializer to enable the mask for that 
line (except for the TTY or CRT output 
line, in which case His initially disabled). 
If the driver processes both input and 
output interrupts, it may be 
advantageous for processing to set the 
interrupt event word for the input line to 
one value (eg., 01) and the interrupt 
vmni word for the output Jme to another 
value (eg., 02). 1haJ>*l4 djiyftfre ^ 
specifies if a directly connected interru pt 
to to fee used (oae section 



ASN This directive assigns logical units to 

physical units. If a new device is being 
added and it is necessary to assign that 
device to a logical unit when the system 
is initialized, an ASN is input. Otherwise, 
the JCP or OPCOM ASSIGN directive can 
be used. The logical-unit table is 
established by these directives. 

PRT This directive for RMDs specifies the 

size and the mnemonic name of each 
partition. A PST «nd DST are created for 
each partition. 

TOF This VORTEX nucleus-generation 

control record directive defines and 
builds the controller T1DB. it specifies 
the name of the driver, status word 
(TBST) setting, and priority level. 

Adding eofrtroeer tables: A controller table is aesembieel x 

as a ***??* •"yy ** added t0 thft W«m-*w>eratio n 
library (a^L) far >oa*r*atj^**rm*iw TtJfneTTne 
contrdHar tab le, name FCI foBowod by me three- or four - 
character ASCII name of the controller, eg., CTTYOA, 
CTMTOA, and C T DOfe. "~ 

VORTEX Input/Output Control (IOC) assumes the first 13 
words of all non-RMD controller tables to be identical, i.e., 
word - CTIOB; word 1 - CTADNC, etc. For RMDs the 
first 18 words are assumed to be identical. Additional 
words may be added to the controller tabie.ta use by the 
individual I/O driver. W 

The controller table comprises parameters that are 
constant for a controller, and parameters mat are variables 
for SGEN and can change with system configuration. 



Constants are assembled as DATA statements. DATA 
statements can be added to the controller table to provide 
additional working space for an I/O driver . 

The following standard items are required by IOC: 



Word Item 



Description 



14.4.5). 



CTIOB - Name of the related controller TIDB (TB 
followed by the same three or four-character name used 
in the controller table e.g.,. TBDOB (for CTDOB). An 
EXT statement must specify the TJD8 name as an 
external name. 

EXT TBDOB 
DATA TBDOB 

1 CTAOMC - This word is used by IOC as temporary 
storage. 

2 CTOPM « The operation code mask specifying the type j 
of 1/0 operation the driver is capable of processing 1 * 1 
driver is capable of processing. ' 
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Bit 



Operation 






Read 


I 


Write 


2 


Write EOF 


3 


Rewind 


4 


Skip record 


5 


Function 


S 


Open 


7 


Close 


O-iO 


Reserved for future use 



Example: DATA 037 

For alt operations excluding Function, 

Open, and Close. 

3 CTDST - Set by I0C to DST address 

Example: DATA 

4 CTRQBK - Set fey !OC to I/O request block being 
processed. 

Example: DATA 

5 CTRTRY - Error retry count. #T followed by the name 
of the controller. 

Example: DATA #TTY0A 
EXT #TTY0A 

6 CTOVAO - Controller device address. # A followed by 
the name of the controller 

Example: DATA #ATY0A 
EXT #ATY0A 

7 CTIOA « l/C algorithm. The ratio of device transfer 
rate to DMA transfer rate +10 percent of the result 
times 32767. Zero lor all non-BIC devices. 

Example: when a disc transfer rate is 

100K words pw second and DMA rate is 

300K words per second, the ratio is about 

.33. Set CTIOA to: DATA 030000 

If ratio is .2S or 25 percent set 

CTIOA (DATA 020000); 50 percent 

set CTIOA (DATA 040000), etc. 

To make CTIOA a SGEN selectable parameter 

(refer to section 15.5.2, EQP directive) 

assemble as an external e.g., EXT #D followed 

by the name of the controller: 



EXT 
DATA 



#DCIOA 

#DCIOA 



for process I/O 



8 CTSTAT ~ DATA 0, for driver use. 

9 CT8ICB - Address of SIC flag table. B followed by the 
name of the name of controller, 

Example: DATA 'BD08 
EXT i'BDOB 
When the driver is entered the item 
points to a call containing the BIC 
device address, 020, 022, 024, etc. 

10CTFCB -SetfcyK)CtotheDCBorFC8 8ddress.Setto 
DATA 



11 CTWDS - DATA 0. Driver use for number of 
words transferred. 

12 CTFRCT - I/O algorithm frequency count. The 
number of retires to be attempted by IOC before 
suspending all subsequent I/O operations until the 
request m CTRQBK (word 4) is activated. DATA 
for non-BIC devices. 

13 CTSTS2 - RMD only. Number of words in an RMD 
sector. 

Example: DATA 120 

14 CTTKSZ - RMD only. Number of sectors in an RMD 
track 

Example: DATA 48 

15 CTPSTO - RMD only. Base address of the PST for 
RMD unit connect to this controller. P followed by the 
four character device name. 

Example: DATA IPD00B 
EXT tPDOOB 

16 CTPST1 - RMD only. Base address of the PST for 
RMD unit 1. 

Example: DATA SPD01B 

EXT IPD01B 

17 CTPST2 * RMD only. Base address of PST for RMD 
unit 2. 

Example: DATA IPD02B 
EXT IPD02B 

18 CTPST3 - RMD only. Base address of PST for RMD 
unit 3. 

Example: DATA fPD03B 

EXT IPD03B 



14.4.4 EnaWing and Disabling PIM 



The disable and enable PI Ms and RT clock instructions 
(EXC 0147, EXC 0747, EXC 0244, EXC 0444) are priv- 
i (edged instructions and cannot be executed in a user map 
(non-map 0) without creating a memory protect interrupt. 
The memory protect processor recognizes the interrupts 
caused by the disable/enable instructions and returns to 
the foreground task in the proper disabled or enabled 
state. The following restrictions apply: 

a. Only foreground tasks are permitted to execute the 
disable/enable PIMs and RT clock instructions. EX21 
error message is output of a background task 
attempts to execute those instructions. 

b. The return to the foreground task is at location n + 2. 
In other words, both the disable PIMs and clock 
instructions (EXC 0747, EXC 0444 or vice versa) or 
enable PIMs and dock instructions (EXC 0147, EXC 
0244 or vice versa) must be toge t her. The second EXC 
instruction is not executed. 
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Example: 



n + 1 



n+2 



Instruction 

EXC 0444 

EXC 0747 



Disable RT clock 
instruction creates 
interrupt. 

This instruction is 
not executed. 

Return location from 
the memory protect 
processor with PIMs 
and RT clock disabled. 



EXC 0444 disables aH PIM interrupts. EXC 0244 enables all 
PIM interrupts that are not masked. There is a PIM 
directive for each PIM line at system-generation time. The 
system initializer enables PIM tines. The mask is enabled 
unless the I/O driver specifically disables it. If a PIM 
directive is omitted, the linkage between the trap and the 
interrupt line handler cannot be established. If a PIM line 
mask is enabled or disabled by a driver, the system mask 
is updated to reflect the current status. The system mask 
configuration is given at tow memory address V$IM (0320 
for PIM1, 0321 for PtM2, etc.). 



EXC 0747 
0147 



the real-time clock interrupt and EXC 



It. 



Figure 14-5 shows the standard VORTEX driver interface. 



Interrupt 

Trap 

Location 










*' 










Interrupt Line 
Handler (Using 
Common Handler) 




„ 


Common 
Interrupt 
Handler 






3 

4 




i' 










Task TIDB 


~ ~ ~\ 






42 






I/O Driver 
















Controller 

Table 

(for Drivers) 


* - j 




Controller 

Address 

Table 







4 










Device 

Specification 

Tables 

(for Drivers) 






— - 




4 









4 






4 




. 




4 






KEY: 



1. The trap address corresponding to the PIM number 
(from PIM directive) points to the SGEN-generated line 
handler. The line handler points to the TIDB (named 
in PIM directive), using the matching TIDB name (on 
TDF control record). 

2. The TIDB name (on TDF control record) points to the 
task, using the entry name tn the assembly of the task. 

3. For OPCOM device drfvwsonfy. The task TIDB points to 
the device controller table name (on TDF control 
record), using the entry name in the controller table 



The OSTs are generated by SGEN, one for each unit 
specified on the EQP directive. All DSTs generated for a 
controller point indirectly to the controller table 
(named In EQP directive), using the entry in the 
controller table assembly. 

Figure 14-5. Driver Interface 
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14.4.5 Wntiiy CmmtM interrupt Hanger 

VORTEX provides a uwr two options of specifying directly 
connected interrupt handlers. The use of a directly 
connected interrupt handler, in lieu of the VORTEX 
common interrupt handler, is specified on the RM directive 
during system generation (section 15.5.11). The interrupt 
handlers must be resent in executive mode, map 0. 

Option 1 (spewing I as the s(n) parameter on the PIM 
directive) requires the user to: 

a. Save and restore the overflow indicator and ail volatile 
registers used by the directly connected interrupt 
routine before returning to the interrupted task. 

b. Not allow IOC and RTE calls. 

c. Minimize executbr, time. 

d. Continue to lockout interrupts during processing, then 
enable the P\m upon editing. The RT clock is 
enabled in aH cases except when the real time clock 
processor has been interrupted. Location 0300, 
V$CTL, will contsir 037 if the RT clock processor had 
been interrupted. T he interrupt handler must provide 
a check for interruption out of the RT clock processor 
and enable ardij«Ne the RT clock acsordrnffi 

e. Restore ths VORTEX system to the proper pre- 
interrupted state, executive or user mode. Any 
interrupt forces the system to executive mode, state 
(see table 11). The interrupt handler must return to 
the proper state. V$KEY, location 0340, contains the 
map key number of the interrupted task, if the 
interrupt task h the user mode (1 i VfKKY £15), 
the switch from "executive to user mode enable" 
instruction CEXC2 0246) must be executed. The "clear 
executive mode state mask" instruction (EXC2 0546) 
must also be executed. 

Example: 



LDB 


DS000 


LOA 


0300 


SUB 


0473 


JAZ 


DIH10 


LDB I 


0104546 


LDAI 


0100147 


JKF 


DSH10+1 


DIH1Q LDA 


D5000 


8TA 


DIH30 


STB 


DIH30+1 


ROF 




LDA 


RQV 


JAMS 


*+3 


SOP 




LDB 


95000 


LDA 


0340 



Check location 0300 
System constant - 037 
Zero - interrupt out of 
RT clock 
Otherwise enable dock 

- 5000 

Enable clock instruction 

Enable mask instruction 

Restore overflow 



NOP instruction 
V$KEY check interrupts 





ANA 


0472 


Task map key 




JAZ 


DIH20 


~ map 




LDB 


0104246 


Switch to user map 


DIH20 


STB 


DIH30+2 






LDB 


RB 


Now restore A, B, X 




LDX 


RX 






LDA 


RA 






BXC 


0244 


Enable PIM 


DIH30 


BXC 


0147 


Modified to ensble clock 
or NOP 




BXC2 


0546 


Modified to clear mask 




HXC2 


0246 


Modified to switch to 
user map 




BXC2 


0646 


Enabled memory protect 




JKF 


* 


Modified to return 
address 



D5000 DATA 05000 

f. Obtain the interrupted task return address. The 

directly connected interrupt line handler is entered via 

a JMPM instruction from the line handler (see figure 

14-1) and as such the first word in the interrupt 

handler must be a mark location. The return address 

of the interrupted task is found in word of the line 

handler, which is obtained by subtracting four from 

the contents of the interrupt handler's mark location. 

Option 2 (specifying 2 as the s(n) parameter on the PtM 

directive) permits the user to use system routines to save 

(V$DHD) the volatile registers and overflow indicator and 

restore (V$ORTN) the volatile registers, overflow indicator, 

and reset the system to the proper pre-tnterrupted state as 

described above. Option 2 relieves the directly connected 

interrupt handler of the housekeeping chores. The A, B, X 

registers, overflow indicator are saved, PIM and clock 

interrupts are disabled prior to entering the user code (via 

JMPM), (see figure 14-1). The user code is entered with the 

A register set to the TBEVNT value and the X register set to 

the user code entry address. 

Upon completion of processing, the directly connected 
interrupt handler exits to system routine, V$DRTN. 

Example: 

<jftHB TAg> 

TASK WTO 

STA EVNT Save TBEVNT word 

* Do processing 



BXT 
J» 



VSDRTN 
VfDRTN 



Exit to common 
processor 



where task must be specified on SGEN PIM directive, e.g. 
PIM.OIOJASK.01,2. 



14.4.6 VORTEX Use of BICs and BTCs 

VORTEX supports a maximum of 15 BICs or BTCs. The 
practical system limit may be considerably less than ten 
depending on the availability of device addresses, the type 
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and number of peripherals, and other configuration 
considerations. The BIC or BTC transfer complete inter- 
rupts must be assigned by ascending BIC or BTC numbers 
(0S2O, 022, 024, 026, 070, 072, etc.) starting with the first 
PIM and the first interrupt i.e., PIM 0, line assigned to 
BIC 020; PIM 0, tine 1 assigned to BIC 022, etc. The first 
BIC must have a device address of 020; the second, 022; 
the third, 024; the fourth, 026; the fifth, 070; the sixth, 072; 
etc. Unless the special DEF control directive is used. 

I/O drivers utilizing BICs or BTC must call the common BIC 
routine V$BtC. The X register is set to the initial buffer 
address and the A register set to the final buffer address. 
The call to V$BIC is: 



JSR 


V$BIC,B 


DATA 


Interrupt event word or if no 




line handler modification to be 




performed. 


DATA 


Map number 



14.4.7 V 



ORTEX II 



and VORTEX Compatibility 



User programs written to operate under VORTEX wiH be 
operable under VORTEX II under the following conditions: 

a. Programs which contain any RTE service requests or 
Input/Oulput Control requests must be assembled by 
the VORTEX II version of DAS MR. Any program 
which builds these requests without the DAS MR 
macros must be modified so that the requests 
conform to the VORTEX II calling sequence. 



e. User tasks (non-nucleus) must not communicate with 
the nucleus except through the use of standard 
executive service and I/O requests or by referencing 
entry points which are contained in the core-resident 
library. 

f . A user task can request a transfer of a block of data 
from map to the user may by executing a RTE PASS 
request 

g. Direct connect interrupt handlers must restore the 
system to the ore-interrupted map state after servicing 
the interrupt. An alternative is to utilize the SGEN 
PIM directive, option 2, as described in section 
14.4.5. 

h. I/O drivers written for VORTEX operation must 
be modified for VORTEX li as follows: 

1 . The map number must be passed when call- 
ing V$BIC, common BIC /BTC routine (see section 
14.4.6). 

2. The I/O drivers must switch executive mode 
states (see section 1 .3) to fetch /store data from 
a user map (DOB, FOB, buffer). ROBLK data are 
stored in map by dynamic memory allocation. 

3. Rotating memory device (RMD) drivers must 
determine If a data transfer (read, write) I/O re- 
quest is by SAL (search-aBocated-load task). If 
ft is a SAL request, the map number is obtained 
from TBEVNT of the TIDE for SAL. Otherwise, 
the requestor's map number is obtained from 
TBKEY. SAL is the RTE component which loads 
non- resident tasks into memory. The check may 
be accomplished as follows: 



b. Any foreground task which executes hardware I/O 
instructions except disabling and/or enabling PIMs 
and RT clock, see section 14.4.4, must be included as 
part of the resident nucleus when the system is 
generated. Foreground library tasks which are made 
resident during system generation by use of the TSK 
directive are not considered nucleus tasks and 
therefore must not contain any hardware I/O instruc- 
tions (see section 14.4.8 for discussion on resident 
tasks). 

c. Intertask communications can be accomplished: 
through the use of foreground blank common; 1>y 
establishing named tables and buffers in the nucleus 
table module and referencing the named block by an 
external statement; by use of the RTE PASS request 
between a user map and map 0; by switching 
executive mode states (see section 1.3); by snaring 
the same physical pages utilizing the MAPIN and /or 
PAGNUM RTE requests. 

d. User tasks (except priority 1 system tasks) may not 
write into or execute instruction from the first physical 
page. This page is the VORTEX II low memory area. It 
is mapped as read-operand only into all user tasks 
(see figure 2-2), except priority 1 tasks where page 
is mapped as read-write access mode. 





LDA 


KTXDB.B 


RTIDB - word 4 of RQSLK 




BOB 


VBLBAL 


VSUML - fccottor. 0312 - SAL T10B 




J AMI 


XXX 


Jut* If not SAL 




LDS 


VBLBAL 


Vot SAL Mnuphiy 




LDA 


TBBVWT, 


B From TBCVNT 




JW 


YYY 


Now common prococtinf 


XXX 


LDB 


KTIDB.B 


I/O rfMMtl not by SAL 




LDA 


TBKSY.B 


Got mop koy from TBKEY 


YYY 


AHA 


BX17 


Mask bits 4-0 



4. Following a BIC transfer complete interrupt the I/O 
driver sense for a map memory protection I/O data 
transfer error: 



SBN 



0101+da,er 



where da is the BIC device address (which is found in 
word Oil of the controller table), and er is the 
address of the error processing routine which must 
set up an 1046 error code prior to calling V$ERR. 

If a user wants to fetch /store from the nucleus tables, 
the user must ensure that the nucleus table module is 
mapped into the user's logical memory. He does this 
through an external reference to a symbol, TIDB, 
controller table, etc., within t^e nucleus module. 
Example - have an "EXT TBTYOA." 
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TIDBs for nonresident tasks - except JCP and OPCOM 
•• are dynamically allocated in map 0. Hence a 
foreground user task cannot toad a register (S,X) 
from locatkm 0300 (V$CTU or an address from any 
other tow-core location) and directly fetch the TfDB 
data. In VORTEX, ft is possible; in VORTEX II, such an 
attempt would rm&ft in a memory protect interrupt. 
The foreground user can fetch the TIDB data by use 
of the PASS macro. Except for clearing the TBEVNT 
word, via the RTE TBEVNT request, a foreground user 
task cannot modify the TIOB. 



IS U 13 12 11 10 t 


• 7<S4t£10 


Task Nmim, ttrat two characters 


Task Nairn; Moond two dMractart 


Tisk Nbitw, third two charactan 


Entry PWot 


Starttn§ pbyifcal paft numbar 


Numbar <Ap*m 


Nuctaut maduto 
tntftcaafr 


Raaamcf tar 

fatura **• 



14.4.8 fteideftt Tatks 



The VORTEX II us^r tmy specify two types of resident tasks 
during system generation; user mode resident tasks; and 
executive mode m*ap resident tasks. 



a. User mode resident tasks. These tasks are foreground 
library tasks that are made resident via the SGEN 
TSK directive. These tasks execute as user mode 
tasks and c&nnet execute any I/O type instructions 
except enable/disable PIMs and RT clock. They reside 
In memory and may be scheduled via OPCOM or RTE 
SCHED requests specifying LUN - a As these tasks 
do not reside in map virtual memory, the dynami- 
cally allocated space (see figure 1.2) is not reduced as 
it would be for the executive mode map resident 
tasks. Thes& resident tasks are defined in - the 
resident directory specified by VSCROR (0341). Each 
entry in the directory is as follows: 



>. Executive mode, map resident tasks. These tasks 
reside in the nucleus program module in map 0. No 
special SGEN directive is required to include these 
tasks as part of the nucleus. The VORTEX II user 
specifies the generation of these resident tasks by 
adding the program obia ct modules on the SGI 
between th« ctl.21 »nrf cti past^ control records 
(see figure 15-2). The program name should not start 
with the characters "VZ-" as these are reserved for 
I/O drivers. SGEN processes I/O drivers selectively 
and ignores all I/O driver object modules unless a 
SGEN €QP directive specified the corresponding 
peripheral. These executive mode resident tasks: (1) 
are permitted to execute I/O type instructions; (2) 
cannot nor mally be schod»H t *g ftfrflPra^ o* ptc 
SCHED reoueet . butar^acBvrtad hyjeaetgngbtt 14 
of the HOB statue word T ayr /t^w^gjT^iff^ 
I/O rfrwatl gmUftl^O) imistittMe^jggjdent 



created by a SGEN TDF 
of 



tive. An ^Harnett mnnnri 

Juo^jai»DQaLg£5UMf 
request . H owever, caution must be exercised as the ) 
RESUME request activates the highest priority task 
with a matching name. ' 
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SYSTEM GENERATION 



The VORTEX syelem-generaMon component (SGEN) 

tailors the VORTEX operating system to specific user 
requirements. SGEN is a collection of program on 
magnetic tape, punched cards, or disc pack. It includes 
all programs (except the key-in loader, section 15.3) 
for generating an operating VORTEX system on an 
RMD 

Figure 15 1 is a block diagram of the data flow through 
SGEN. 



15.1 ORGANIZATION 

SGEN is a five-phase component comprising: 

• I/O interrogation (section 15.4) 

* SGEN directive processing (section 15.5) 



• Building the VORTEX nucleus (section 1 5.6) 

• Building the library (section 15.7) 

• Resident-task configuration 

I/O interrogation specifies the peripherals to: 

a. Input VORTEX system routines (LIB unit) 

b. Input user routines (ALT unit) 

c. input SGEN directives (DIR unit) 

d. Output the VORTEX system generation (SYS unit) 

e. List special information and input user messages (LIS 
unit) 



DIR INPUT UNIT 



SGEN DIRECTIVES 



LIB INPUT UNIT 



.zo 



System Generation Library 

(Object modules and con- 
trol records) 



.y. 



SGEN ROUTINES 



ALT INPUT UNIT 






C 



VORTEX 

NUCLEUS 

(And system 
initializer) 




77" 



\-\- 



User Routines 

(Object modules and 
control records) 

T 

I 



I t 



r 



FOREGROUND 
LIBRARY 



BACKGROUND 
LIBRARY 



USER 
LIBRARIES 



SYS OUTPUT UNITS 




VTIl }222 



Figure 15-1. SGEN Data Flow 
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i/0 interrogation also specifies that the Teletype on 
hardware address 01 is the OC unit. After these peripherals 
are assigned, appropriate drivers and i/O controls are 
loaded into memory. 



Note: SGEN does not build an object module library. To 
construct the VORTEX object-module library (OM) or any 
user object-module library, use the file-maintenance 
component (FMAfN, section 9). 

SGEN directive processing specifies the architecture of the 
VORTEX system based on user-supplied information that is 
compiled and stored for later use in building the system. 
SGEN directives permit the design of systems covering the 
entire range of VORTEX applications. 



Building the VORTEX nucleus consists of gathering object 
modules and control records from the system-generation 
library (SGL, section 15.2) and from user input, and 
constructing the VORTEX nucleus from these data. SGL 
items are input through the LIB input unit, and user items 
through the ALT unit according to rules set up by the SGEN 
directives. 



BuHding the library and the resident-task configurator 
consists of generating load modules from the object 
modules and control records input from the SGL and user 
data. These load modules are then cataloged and entered 
into the foreground, background, and user libraries. During 
library building, load modules can be added, deleted, or 
replaced as required to tailor the library to any of a wide 
variety of formats. After the libraries are completed, 
designated toad modules are copied into the VORTEX 
nucleus to become resident tasks. The resident-task 
configuration of SGEN can also be generated without 
regeneration of the VORTEX nucleus or libraries (section 
15.7). 

SGEN directive format requires that, unless otherwise 
indicated (e.g., section 15.5), the directives begin in 
column 1 and comprise sequences of character strings 
having no embedded blanks. The character strings are 
separated by commas (,) or by equal signs (-). The 
directives are free-form and blanks are permitted between 
individual character strings, i.e., before and after commas 
(or equal signs). Although not required, a period (.) is a line 
terminator. Comments can be inserted after the period. For 
greater clarity in the descriptions of the directives, optional 
periods, optional blank separators between character 
strings, and the optional replacement of commas by equal 
signs are omitted. Section 14.4.8 describes resident tasks 
in greater detail. 

Numerical data can be octal or decimal. Each octal number 
has a leading zero. 

Error messages applicable to SGEN are given in Appendix 
A.15. 



SGEN errors are divided into five categories according to 
type. The category of each error, as well as the specific 
error, is given by the error code. Recovery is automatic 
where manual intervention is not required. When manual 
intervention is necessary, the OC device expects a response 
after the error message is posted. The response can be 
either a corrected input statement (where the statement in 
error was an ASCII record) or the letter " C" . in the latter 
case, the corrected input is expected on the input device 
where the error occurred, immediately after the *C" is 
input. If the input media is magnetic tape or disc pack, 
positioning to reread an input statement is also automatic. 



15.2 SYSTEM-GENERATION LIBRARY 

The System-generation library (SQL) is a collection of 
system programs (in object-module form) and control 
records (in alphanumeric form) from which a VORTEX 
system is constructed. 

In the case of punched cards or of magnetic tape, the SGL 
occupies contiguous records, beginning with the first record 
of the medium. 



In th#> rasp nf rti«ir p^k, th e SGL occupies contiguou s 
records beginning with the second track . T rack contains 
t he partition-specification table (PST. sectio n 3.2) that 



**$ p*«*i*i"ft »v*»nHin g from the secon d track 
-ack 1) to the end of 



T he SOI and the VORTEX system cannot be on the same 
disc pack during system generation. 



The SGL is divided into five functional parts, 
separated by CTL control records (figure 15-2) 



each 



Part 1 of the SGL comprises a VORTEX bootstrap loader 
and an I/O interrogation routine. It also comprises the 
SGEN relocatable loader, the basic I/O control routine, and 
library of peripheral drivers for the use of SGEN. Part 1 
consists entirely of object modules. It is loaded with device- 
sensitive key-in loader (section 15.3) that also serves the 
bootstrap loader as a read -next -record routine. The 
bootstrap-loader/ interrogator is a core-image sequence of 
records generated by a VORTEX service routine. Because it 
calls the key-in loader to read records, the bootstrap- 
loader/ interrogator is itself device- insensitive. 

Control record CTL.PART0001 terminates part 1 of the 
SGL. 

Part 2 of the SGL contains the directive processor After 
being itself input, the directive processor obtains all input 
from the DIR and OC input devices. The system generation 
directives are to be placed between the directive processor 
and the CTL.PART0002 control record if the CIB and DIR 
input units are the same. 

Control record CTL,PART0002 terminates part 2 of the 
SGL 



15-2 



SYSTEM GENERATION 



PART 1 



PART 2 



PART 3 



PART 4 



PART 5 



Bootstrap Loader and 
I/O Interrogation 



Relocatable Loader and 
I/O Control Routine 



SGEN Driver Library 



CTL.PART0001 



Directive Processor 



CTL.PARTO002 



VORTEX Nucleus Processor 



SLM.IMIT 



System Initializer 



END 



SLM. VORTEX 



VORTEX Nucleus 
Library 



ENO 



CTL.PART0003 



Library Processor 



■ System Library 
Routines 



CTL.PART0004 



Resident-Task Configurator 



CTL.ENOOFSGL 



NOTE: 

* = Alphanumeric control record 



Figure 15-2. System-Generation Library 



Control Record CTL,21 - specifies the end of the 
nucleus table module. All user data and programs to be 
included in this module must precede the CTL,21 
control record. 

All programs contained on the SGL between the CTL.21 
and CTL,PArtr0003 control records are included in the 
nucleus program module 



NOTE: 



SLMJNIT 



System Initializer 



Low Memory Package 



END 



SLM.VORTEX II 



All TDF Control Records 



Global FCBs 



V$OPBF and V$JPBF Buffers 



I/O Controller Table 



CTL.21 



IOC Program 



RTE Services 



RTE System Tasks 



RTE Functions 



I I/O Drivers 



END 



CTL t PART0O03 



Part 3 of the SGL comprises all system routines and 
control records required to build the VORTEX nucleus 

(figure 15 3): 

• VORTEX nucleus processor the SGEN -processing 
portion 

• $LM control record indicates the beginning of the 
system initializer portion 

• System-initializer routines object modules to be 
converted into the system initializer 

• END control record indicates the end of the system - 
initializer portion 

• SIM control record indicates the beginning of the 
VORTEX nucleus portion 

• VORTEX nucleus routines - control records and object 
modules to be converted into the VORTEX nucleus 

• END control record indicates the end of the VORTEX 
nucleus portion 



• = Alphanumeric control record 

Figure 15 3 VORTEX Nucleus 

Control record CTL,PART0003 terminates part 3 of the 
SGL 

Part 4 of the SGL comprises all system routines and 
control records required to build load -module libraries on 
the RMD. The library processor converts these inputs into 
load modules, catalogs them, and enters them into the 
foreground, background, and user libraries. The library 
processor is followed by groups of control records and 
object modules, with each group forming a load-module 
package (IMP). 



Control 

SGL 



record CTL f PART0004 terminates part 4 of the 



Part 5 of the SGL contains the resident-task configurator 
portion of SGEN. The configurator copies specified load 
modules from the foreground library into the VORTEX 
nucleus, i.e., makes them resident tasks. 

Control record CTL.ENOOFSGL terminates the SGL 
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REQUIRED 
(FOREGROUND) 
SYSTEM 
TASKS 



REQUIRED 
(BACKGROUND) 
SYSTEM 
TASKS 





SLM,FV$OPC 






TID,V$OPCM,2 t 8,i06 






V$OPCM Program 






ESB 




<! 


END 




* 


SLM.FJCDUM 




* 


TID.JCDUMP.2,0,106 






JCDUMP Program 






ESB 




* 


END 






SLM.FRAZI 






TID.RAZI.2,0,106 






RAZI Program 




!'.< 


ESB 






END 












SLM.BJCP 




TID.JCP.1,0,105 




Job-Control Processor 




ESB 




END 




SLM,BLMGEN j 




TID,LMGEN,1,0,105 i 




Load- Module Generator 




ESB | 




END 


-J 




SLM.BFMAIN 


V 


TID.FMAIN.l.O.lOS 




File Maintenance 




* 


ESB 






END 




* 


SLM.BSMAIN 




TID.SMAIN.1,0,105 


i 




System Maintenance 




v 


ESB 


• 


ENO 



SLM.BFORT 



TID,FORT r l,0,105 



FORTRAN Compiler 



ESB 



ENO 



SLM.BCONC 



TID.CONC.1,0,105 



Concordance Program 
ESB 



END 



SLM.8IOUTI 



TID,IOUTIL,1,0,105 



I/O Utility Program 



ESB 



END 



SLM.BSEDIT 



TID,SEDIT t l,0,105 



Source Editor 



ESB 



END 



SLM.BDASMR 



TID.DASMR.1,0,105 



DAS MR Assembler 



ESB 



END 



NOTE: 



Alphanumeric control record 



Figure 15-4. Load-Module Library 
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15.3 KEY-IN LOADER 

SGEN is initiated on a new or initialized system by 
inputting the key in loader through the CPU The key in 
loader loads the VORTEX bootstrap loader (part 1 of the 
SGL). Key in loaders are available for loading from 
magnetic tape, punched cards, or disc pack. The required 
key in loader is input to memory through the CPU console 
and then executed to load the VORTEX bootstrap loader. 



Automatic bootstrap loader (ABL): In systems equipped 
with an ABL, load the key in loader from the input medium 
into memory starting with address 000000 To execute the 
key-in loader, clear the A, B. X, I, and P registers; then 
press RESET, set STEP/RUN to RUN, and press START 



See hardware handbook for details on manual loading. 



Table 15-1. SGEN Key In Loaders 









RMD 


RMD 


Address 


Magnetic Tape 


Card Reader 


70-76x0 


70-76x3 


000000 


010030 


010054 


0100*54 


010064 


000001 


001010 


001 010 


140066 


140066 


000002 


001106 


00 1 1 06 


001010 


001010 


000003 


040030 


040054 


001106 


001106 


000004 


001000 


001000 


001000 


001000 


000005 


000012 


000012 


000012 


000012 


000006 


000000 


000000 


oooooo 


oooooo 


000007 


006010 


006010 


006010 


006010 


000010 


000300 


000300 


000300 


000300 


000011 


050027 


050053 


050065 


050065 


000012 


1041zz 


1002/z 


1004// 


1004zz 


000013 


lOOOzz 


002000 


1002?/ 


010063 


000014 


001000 


000046 


010063 


110072 


000015 


000021 


1025/z 


] 1 0072 


1031zz 


000016 


1025zz 


002000 


1031// 


1002zz 


000017 


057027 


000046 


lOluz/ 


lOldzz 


000020 


040027 


1026z/ 


000023 


000023 


000021 


lOllzz 


004044 


001000 


001000 


000022 


000016 


004444 


000017 


000017 


OO0023 


1012zz 


057053 


1025z/ 


1025zz 


000024 


100006 


005001 


150071 


150071 


00002b 


001000 


040053 


001016 


001016 


000026 


000021 


004450 


000012 


000012 


00002/ 


000500 


002000 


lOOOyy 


lOOOyy 


oooo^o 


1/7742 


000046 


1003zz 


5000 


0000.-}] 




1026/z 


010064 


010064 


000032 




004044 


110072 


110072 


OOH033 




004450 


1031 zz 


1031Z2 


000034 




002000 


010065 


010065 


Of =0()35 




000046 


1031xx 


1031xx 


O00036 




1022/z 


120070 


120070 


00003/ 




057053 


005012 


005012 


<HH)040 




040053 


1031 yy 


1031yy 


000041 




06/053 


lOOOxx 


lOOOxx 


'100042 




040053 


1 000// 


lOOOzz 


000043 




001000 


1014/z 


1014zz 


000044 




000013 


000043 


000043 


00004 5 




lOUzz 


1025zz 


1025zz 


000046 




000000 


150071 


150071 


00004/ 




lOlbzz 


001016 


001016 


Ot 50050 




1 00006 


000012 


000012 


000051 




001000 


060065 


060065 


000052 




000045 


040064 


040064 


OOO053 




000 5 00 


010064 


010064 
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Table 15-1. SGEN Key-In Loaders (continued) 

Address Magnetic Tape 

000054 
000055 
000056 
000057 
000060 
000061 
000062 
000063 
000064 
000065 
000065 
000067 
000070 
000071 
000072 





RMO 


RMO 


Card Reader 


70-76x0 


70-76x3 


177742 


140067 


140067 




001016 


001016 




100006 


100006 




050064 


050064 




040063 


040063 




001000 


001000 




100006 


100006 




000001 


000001 




000001 


000001 




000500 


000500 




000037 


000037 




000060 


000069 




000074 


000074 




007760 


007760 




OvOOOO 


wwOOOO 



where 



yy 

12 

u 



even SIC address 

odd BIC address 

device address 

RMD unit number in Sense Instruction 

u ~ for unit 

u * 1 for unit 1 



v « RMD unit number in unit Select Instruction 
v = for unit 
v ** 4 for unit 1 

d - RMD drive number (0-3) 
ww - drive (bits 15-14) /platter (bit 13) 
(i.e., platter 1 drive • 02) 



15.4 SGEN I/O INTERROGATION 

Upon successful loading of the bootstrap loader and I/O 
interrogation, the OC unit outputs the message 

10 INTERROGATION 

after which the SGEN peripherals are specified by inputting 
on the OC unit the five I/O directives: 

DiR Specify SGEN directive input unit 
U3 Specify SGL input unit 
AlT Specify SGL modification input unit 
SYS Specify VORTEX system generation 

output unit 
LIS Specify user communication and 

list output unit 

These directives can be input in any order. SGEN wilt 
continue to request I/O device assignments until valid ones 
have been made for all five functions. 

SGEN drivers are loaded from the SGEN driver library 
according to the specifications of the SGEN I/O directives. 
Errors or problems with reading the drivers will cause the 
applicable error messages (Appendix A. 15) to be output. 

The general form of a SGEN I/O directive is 
function » driver .device, b*c 



where 






function 


is one of the directive names given 




above 




driver 


is one of the driver i 


names given below 


device 


is the hardware device address 


bic 


is the BIC address 




Name* 


Type of Device 


Model Numbers 


MTcuA 


Magnetic- tape unit 


70-7100 


LPcuA 


Line Printer 


70-6701 


LPcuD 


All Statos 


70-6602 




models*** 


70-6603 


CRcuA 


Card reader 


70-6200 


PTcuA 


Paper-tape 
read /punch 


70-6320 


TYcuA 


Teletype or CRT 


70-6100, 
70-6104 


DcuAl 


Rotating memory 


70-7702 


DcuA2 


Rotating memory 


70-7703 


DcuA5 


Rotating memory 


620-49 


OcuB 


Rotating memory 


70-7600, 
70-7610 
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Name* 


Type of Device 


Mode) Numbers 


DcuC 


Rotating memory** 


707500 


DcuD 


Rotating memory** 


707510 


DcuF**** 


Rotating memory** 


707603 



bic 



* where c stands for the controller number (0, 1. 2, or 3), 
and u for the unit number (0 r 1, 2, or 3). 

* * Always specify the first master unit of a particular device 
as being on controller 0, the second master unit on 
controller l, etc. Regardless of the controller specifications 
in the EQP directives, different controller numbers must be 
used for each RMD type (i.e., if using MT 1 on DA 12 r 
specify MT00A). If the system has a 7600 and 7500 RMD, 
then specify D00B and DICK? 

*** Statos 33 is not supported during system generation 
**** Unit number = through 7. 



15.4.1 DIR (Directive Input Unit) 
Directive 

This directive specifies the unit from which all SGEN 
directives (section 15.5) will be input (DIR unit). The 
directive has the general form 



DIR » dr iver.de vice 6/c 



where 



driver is one of the driver names MTcum, 

TYcum, PTcum, or CRcum (m is a model 
code, as given in 15 4) 

device is the hardware device address 

*>«■" is the BIC address (used only, and then 

optionally, for magnetic-tape units) 

Exampte: Specify Teletype unit having model code A 
and hardware device address 01 as the DIR unit. 

nTP*TY0OA,0t 



15.4.2 LIB (Library-Input Unit) Directives 

This directive specifies the unit from which the SGL will be 
input (LIB unit). The directive has the general form 

LIB « drlver.de vice, bic 

where 



*s the BIC address (used only, and then 
optionally, for magnetic-tape units) 
mandatory for RMDs 



Example: Specify magnetic-tape unit having model code 
A and hardware device address 010 (no BIC) as the LIB 
unit. 

LIB«MT00A, 10 



15.4.3 ALT (Library-Modification 
Input Unit) Directive 

This directive specifies the unit from which object modules 
that modify the SGL will be input (ALT unit). The directive 
has the general form 



ALT m driver r dev(ce,bfC 



where 



driver 

device 

b-<: 



is one of the driver names MTcum, 
PTcum or CRcum 

is the hardware device address 

is the BIC address (used only, and then 
optionally, for magnetic-tape units) 



Example: Specify card reader unit having model code A 
and hardware device address 030 as the ALT unit. 

ALT-CROOA, 30 



15.4,4 SYS (System-Generation 
Output Unit) Directive 

This directive specifies the RMD(s) onto which the VORTEX 
system will be generated, with the VORTEX nucleus on the 
first such device specified. Up to 16 RMDs can be specified. 
The dirf»ctive has the general form 



SYS 



whore 



driverl.de vice 1, bic I;drrver2.device2, 
bic 2; . ;drivern, devicen, bicn 



driver is an RMD driver name such as Dcum, 

where c - controller, u - unit, and m 
* model code 

device is the hardware device address of the 

corresponding driver 

•>'(' is the mandatory address of the 

applicable BIC or BTC 



driver 



device 



ts one of the driver names MTcum, 
ORcwm. or Dcum 

ts thp Hardware device address 



All RMDs specified in the EQP directives (15.5.2) must be 
specified in the SYS directive. Subsequent SYS directives 
will overlay the previous directives. If ail RMDs cannot be 
specified in a single line, then the directive must be 
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terminated with a co!on. This wili cause the next input line 
to be treated as a continuation of the previous SYS 
directive. The additional input lines begin with the driver 
parameter. The directive "SYS-" must not be used on 
additional SYS directive input tines. 

Examples: Specify 8MD having model code B, hardware 
device address C16, and BIC address 020 as the SYS unit 

SYS-DOOB, 016,020 

Specify two SYS units: RMD with model code A2, 
hardware device address 014, and BIC address 020; and 
RMD with model code B, hardware device address 015, 
and BIC address 022. 

A system with 70-7500 (620-34)or 70-7510 (620-35) disc 
requires a special formatting program, described in section 
18.4. This program formats disc packs and performs bad- 
track analysts. 

SYS-D00A2 ,0H f 020 J D 1 08 , 1 5 , 022 

15.4.5 LIS Directive 

This LIS (User-Communication and List Output Unit) 
directive specifies the unit that will be used for user 
communication <snd Nst output (LIS unit). The directive has 
the general form 



Ll$-drtver,dev£ee 



where 

driver is one of the driver names TYcum or 

L^cum 

device is the hardware device address 

The following information appears on the LIS unit: 

a. Error messages 

b. Load map of each «oad module 

c. Directives, input through the DIR unit (section 1 5.4. 1 ) 

d Partition table for each system RMD 

To suppres s listing during system gener ation set "map" to 
zero in EDR flreslivj c 

Example: Specify line printer having model code A and 
hardware device address 035 as the LIS unit. 

LIS-LPOOA, 035 



15.5 SGEN Directive Processing 

Upon successful loading of the SGEN directive processor, 
the OC and LIS (section 15.4.5) units output the message 



INPUT DIRECTIVES 

to indicate that SGEN is ready to accept SGEN directives 
from the DIR unit (section 1 5.4. 1 ). 

The SGEN directives described in this section can be input 
in any order, except for the EDR directive (section 15.5.14), 
which is input last to terminate SGEN directive input. 

In cases of confNcttng data, SGEN treats the last informa- 
tion input as the correct data. 

Errors cause the output of the applicable error messages 
(Appendix A. 15). 

The general form of an SGEN directive is 

**»Ml>xp<2)x...xp(n) 

where 

aaa is a three-character SGEN directive 

name 

each p(n) is a parameter as indicated in the 
specifications for the individual 
directives 

each x is a punctuation mark as indicated in 

the specifications for the individual 
directives 

In contrast to most VORTEX system directives, the 
punctuation In SGEN directives is exactly as defined in the 
specifications for the individual directive* although blanks 
are allowed between parameters, i.e., before or after 
punctuation marks. SGEN directives begin in column 1 and 
can contain up to 80 characters. 

SGEN directives are listed on the OC and LIS units. 



15.5.1 MRY (Memory) Directive 

This directive specifies the memory-related parameters of 
SGEN. It has the general form 



MR Y.memory, common, size [[V75) 



where 



memory 



common 



sbe 

V75 



is the extent of the memory area 
available to VORTEX (minimum 12K - 
027777) 

is the extent (0 or positive value) of the 
foreground blank-common area 

is the total physical memory available to 

specifies V75 system 
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Examples: Specify a 48K memory for VORTEX with a 
foreground blank common area of 0200 words. Save 
locations 075777 to 077777 of the first 32K memory for 
AID! 

MPY, 075777, 0200, 48 

Specify an 18,0dR word memory for a VORTEX V75 system 
with no foreground blank-common area. 

MRY, 18000, 0,V75 

15.5.2 EQP (Equipment) Directive 

This directive defines the peripheral architecture of the 
system It has the general form 

EOP t name,a<ldress,numb*r,bk;,retry f a(g r mul 

where 



name 



address 



number 



bi<: 



retry 



al8 



mui 



is the mnemonic for a peripheral 
controller 

is the controller device address (01 
through 077 inclusive) 

is the number (1 through 4, inclusive) of 
peripheral units attached to the 
controller 

is the BIC or BTC address (0 if no BIC 
applies) 

is the number (0 to 99, inclusive) of 
retries to be attempted by the I/O driver 

when an error is encountered 

v 

is the I/O algorithm value (O^alq < 
1 ) as a decimal fraction (see section 
14.4.3. word 7 for the calculation of 
this value) NOTE: this is an optional 
parameter and is not needed unless a 
change is desired in the algorithm value. 
If this parameter is to be used on non 
process I/O controller tables, the subject 
controller table must contain CTIOA as 
an entry name 

is the multiplexor address (this 
parameter applies only to process I/O 
drivers* 



>pt 



*bi<« mnemonics for name Are 

MTnm Magnetic tape unit 

LPnm Line printer 

CRnm Card teader 

P7nm Pap*-r tape reader /punch 



TYnm 


Teletype 


CTnm 


CRT device 


CPnm 


Card Punch 


Dnm 


RMD 


CI 


Process input 


CO 


Process output 


wes 


Writable control store 


SPnm 


Spool Unit 


MXnm 


Communication Multiplexor 


TCnm 


Psuedo TCM 



Where n is the controller number (0, 1, 2, or 3), and m is 
the model code (table 15 2) 

Con t roller tables are . _arrajnged ^ccraxling^ jp the_jicioxjly 
levels of their task-identification blocks (TiDBs). On any 
given level, the. tables are arranged <n the input sequence 
of the corresponding EQP directives Device specification 
table (DST) entries are unsorted. 

The following order is suggested for peripheral controllers 

a RMDs 

b Operator communication (OC) device (section 17) 
c Magnetic-tape units 
d Other units 



lor the 70 76*03/7013 disc, a special DEF directive must be 
included for each EQP directive used for this model disc 



OEF,V$DSKx,y 



where 



x is the controller number (0-3) 

y is a bit pattern in bits 0-7. Bit(n) 

corresponds to platter(n). The bit is 
set if the corresponding platter is 
part of a dual platter driver. 

Example: A system contains two 70-76x3 controllers with 
the following drives attached: 

Controller has 1 dual unit and 3 single units 
Controller 1 has 2 dual units, and 1 single 
unit, and I dual unit 

the corresponding directives would be: 

EQP, D0F,016 f 5,020,5 
DEF,V$DSK0,3 U 0|| 

EQP,D1F,017,7, 022, 5 
DBF, VSDSK1 ,0 157 



Ml 



n 
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Code 

TYnA 

CTnA 
CRnA 

CPnA 
MTnA 



Table 15-2. Model Codes for VORTEX Peripherals 
Model Number Description 



MXnA 



DnA 



DnB 



DnC 



DnD 



DnF 



PTnA 



LPnA 



LPnD 



70-6104 
(620-08) 

70-6401 

70-6200 

(620-22, 

62025) 

706201 
(620-27) 

70 7100 

(62030) 

(620-31A) 

(620-31B) 

(620-31C) 

70-7102 

(62032) 

70-7103 

(620-32A) 

70-520X (520X) 
70521X 

62047,-48,-49 

70770X 

(62043C.-43D) 

707600 
(620-36) 
70 7610 

(620-37) 

70 7500 
(620 35) 

70-7510 
(620-34) 

707603 
70-7613 

70 6320 

(620-55A) 

(620-51A) 

70-6701 
(62077) 

706602 



ASR Teletype Model 33 
ASR Teletype Model 35 

CRT keyboard /display 

Card reader: 300 or 600 cards/minute 

Card punch: 35 cards/minute 

Magnetic-tape: 9 track, 800 Dpi, 25 ips 

Magnetic tape: 7 track, 200-556 Dpi 

Magnetic-tape: 7 track, 200-800 bpi 

Magnetic- tape: 7 track, 556-800 bpi 

Magnetic tape: 9-track, 800 bpi, 37 ips 

Slave unit with 620-32 

Data communications multiplexor 



Rotating memory 
Rotating memory 



Rotating memory 
Rotating memory 

Hot > ':\\g memory 

Rotating memory 

Rotating Memory 

Paper tape reader /punch 

Line Printer 

Statos 31 Printer/plotter 
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Tab* 15-2. Model Codes for VORTEX Peripherals 

(continued) 



Code 


Model Number 


Description 


LPnE 


70-66G3 
(620-76) 


Statos 31, 41 Printer/plotter 


LPnG 


70*603 

(42,51,71) 


Statos 31/42 Printer /plotter 


LPnH 


70-7702 


Statos-31 (-41,-51,-52) 


LPnJ 


7046xx 


Statos 33 


ClnA 


See sec. 19 


Process I/O 


COnA 


See sec. 19 


Process I/O 


WCS 


70-40G2 


Writable control store 



Note: Other peripheral devices can be added to the 
system by creating an EQP directive with a unique phsyical* 
unit name for the device. A controller table with the same 
name is then added to the VORTEX nucleus by an ADD 
directive (section 15.5.5). 
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Example: Define a system containing one model 8 RMD, 
one model A magnetic-tape unit, one mode A card reader, 
one model A line printer, one model A Teletype, one model 
A highspeed paper-tape reader /punch, one model A card 
punch, and a writable control store. 

EQP,D0B,0U, 1,020,3 
BQP,MT0A,01Q, 1,022,5 
BQP,CR0A,O30, 1,024,0 
BQP,LP0A,035, 1,024,0 
EQP,TY0A,01, 1,0 ,0 
BQP.PT0A, 037, 1,0,0 
BQP,CP0A,031, 1,022,0 
EQP,WCS,074, 1,0,0 

The paper width of each Statos on the system must be 
defined through use of the SGEN DEF directive (see section 
15.5.14). This directive has the form 



DEF,V$SWnm,c 



where 



m 



is the controller number (0, 1 or 2) 
is the Statos model code (D,E,G,H, or J) 
is the width code, defined as 



- 8-1/2-inch 


4 - with SLIB 


1 « 11 inch 


5 - with SLIB 


2 - 14-7/8-inch 


6 - with SLIB 


3 - 22-inch 


7 - with SUB 



Example: Specify a SGEN directive for model G Statos on 
controller 1 with 14-7/3-inch width paper 

DEF,V$SW1G,2 

15.5.3 PRT (Partition) Directive 

This directive specifies the size of each partition on each 
RMD. It has the genera! form 

PRT,Dcup(l) ? s<l),k(l);Dcup(2) l sr2>,k('2>;...; 

Dcup(h)Mn)Mn) 



where 



Dcup(n) is the name of the RMD partition with c 
being the number (0, 1, 2, or 3) of the 
controller, u the unit number (0, 1, 2, or 
3), and p the partition letter (A through 
T, inclusive) 

t(n) is the number (octal or decimal) of 

tracks in the partition. The maximum 
partition size on any RMD it 32,768 
sectors 

*<n) is the protection code (single 

alphanumeric character including $) for 
the partition, or • if the partition is 
unprotected 



At least six paritions are required for the system rotating 
memory. PRT directives are required for every partition on 
every RMD in the system. While the partition specifications 
can appear in any order, the set of partitions specified for 
each RMD must comprise a contiguous group, e.g., the 
sequence D00A, D00C, D00D, D008 is valid, but the 
sequence D00A, D00C, D00D, D00E constitutes an error. 

NOTE: I f the LIB unit is an RMD, the PRT directives for 
that RMtTare ignored "a nd the exis ting PST for the RMDis 
used . H owever, even thougMh e"PRT dire^ives ar^gvored 
the RMD unit should have at least one PRT directive. RAZI 
may be used to partition the RMD unit after system 
generation. |LJteJ*MP..SGl is to be saved, it m usUae 
fgBtafigd-MrittLJi scratch-Pack prior to executing RAZI for 
that unit 



Logical units 101 through 106 inclusive have preassigned 
protection codes. Do not attempt to change these codes. 

Preassigned Protection Codes 

Unit Number 101 102 103 104 105 106 

Code S B C D E F 

Total number of tracks of all partitions and the capacity of 
VORTEX nucleus must not exceed rotating memory track 
capacity. The nucleus size is equal to the memory size 
divided by the product of the number of sectors per track 
and 120. Tracks not included by a PRT directive are not 
accessable to the system. 

Example: Specify the following partitions on two RMDs. 
RMD No. Partition Tracks Protection Code 



2 

20 

25 

40 

8 

18 

18 

66 

40 

60 

50 

52 



C 

F 

E 

D 

S 

B 

None 

None 

None 

R 

None 

X 



PRT,D00A,2,C;D00B,20,F 
PRT,D00C,25,BjD00D,40,D?D00E,8,S 
PRT,D00r, 18B>D00G, 18 , • iDOOH, 66 , * 
PRT,D01D,52,X;D01C,50,* 
PRT f D0lA l 40,*jD01B,60,R 



15.5.4 ASN (Assign) Directive 

This directive assigns logical units to physical devices. It 
has the general form 

ASN,han(l) - dev(l),/un(2) - dev(2),..Jun(n) « dev(n) 
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where each 



lun(n) 



dev(n) 



is a logical unit number (1 through 100 
or 107 through 255, inclusive) that can 
be followed optionally by a two-character 
logical unit name e.g., 107:Y7 

is a four character physical-device 
name, e.g., TY00.D00G (table 17-1) 



If a new assignment specifies the same logical unit as a 
previous assignment, the old one is replaced and is no 
longer valid. All logical units for which physical device 
assignments are not explicitly made are considered dummy 
units, except preassigned. 



Restrictions: Any attempt to change one of the preset 
logical unit namernumber or name:number:partition rela 
tionships given in table 15 3 will cause an error to be 
flagged. Table 15-4 indicates the permissible physical unit 
assignments for the first 12 logical units (with PO 
automatically set equal to SS for normal assembler 
operation). 

Example: Specify physical device assignments for logical 
units 112, inclusive, 107 and 108, and 180 and 181, where 
the last two units have, in addition to their numbers, two 
character names. 

ASN, 1-TY00 , 2-CR00 , 3-TY0 1 , 4-CR00 
ASN, 5-LPOO , 6-MT00 , 7-DOOI , 8-D00G 
ASN,9-D00H, 10-D00G, 11«TY00 r 12-LP00 
ASN, 107-LPOO, 108-CR00 
ASN, 180:S6-MT00, 181 :S8«MT01 



Table 15-3. Preset Logical- Unit Assignments 
Preset logical-unit name/number relationships: 



OC - 1 
SI - 2 
SO - 3 
PI - 4 



LO - 5 
Bl * 6 
BO - 7 
SS - 8 



GO 
PO 
01 



9 

10 
11 



DO - 12 



Preset logic al-unit/RMDpartition relationships: 



S& 



13 » RPG IV READ 

14 « RPG SV PUNCH 

15 - RPG IV PRINT 






<2 



*^A 






Logical-Unit 


Logical-Unit 


Partition 


Name 


Number 


Name 


CL 


103 


DOOA 


FL 


106 


DOOB 


BL 


105 


DOOC 


OM 


104 


DOOD 


CU 


101 


DOOE 


SW 


102 


DOOF 



Optional logical-unit/RMD-partitton relationships 



Protection 
Key 

C 
F 
E 
D 
S 
B 



Minimum 
( VORTEX SectorN 
xAHocation ; 

025 (see note 5) 
0106 
01135 
0417 

0310 (See note 
0310 (See note 



% 

672. 






'*« 



GO 


9 


DOOG 


SS 


8 


DOOH 


PO 


10 


DOOM 


Bl 


6 


DOOI 


BO 


7 


DOOI 



1 CU file must be as large as background tasks largest 
part in central memory at one time (24K assumed 
above). 

2 SW file must be as large as the largest single task 
including overlays (24K assumed above). 

3. GO file must be somewhat larger than the largest task 
run in toad-andgo mode (24B, assumed). If system is 



none 
none 
none 
none 

none 



0310 (See note 3) 

varies 

0515 (See note 4) 

varies 

varies 



52$ 



foreground only or all tasks will be entered in libraries 
before execution, this partition may be eliminated. 

PO file must be large enough for source images of the 
largest task to be assembled or compiled. Source 
images are stored 3 card images per sector (1000 
cards assumed above). If this function is assigned to 
magnetic tape, this partition may be eliminated. 

There are 12 entries per 2 sectors. Number of sectors 
equals numbers of entry * **. 
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Logics! Units 


1 


(OC) 


2 


(SI) 


3 


(SO) 


4 


(PI) 


5 


(10) 


6 


(Bl) 


7 


(BO) 


8 


(SS) 


9 


(GO) 


10 


(PO) 


11 


(Dl) 


12 


(DO) 



Tabic 15-4. Permissible Logical Unit Assignments 
Permissible Physical Units 



Teletype RMO or 
or CRT MT 



X X 

X 

x x 

X X 

-♦x 

X 
X 
X 

X 

X 



Line 
Printer 



Other 

Output 

(CP.PT) 



Other 
Input 

(PT.CR) 



15.5.5 ADD (SGL Addition) Directive 

This directive specifies the SGL control records and object 
modules after which new control records and /or object 
modules are to be added during nucleus generation. It has 
the general form 

ADD.pfl ),pC2),. ,p(r\) 

where each p(n) ;s the name of a control record or an 
object module after which new items are to be added 

When the name of a specified item is read from the SGL, 
the program is processed and the message 

ADD AFTER p(a) 
READY 

appears on the OC unit. User response on the OC unit is 
either 



ALT unit and adds it to the SGL, then prints on the OC unit 
the message 

READY 

to which the user again responds with either ALT or LIB on 
the OC unit 

Example: Specify that items are to be added during 
nucleus generation after control records or object modules 
named PR0G1. PR0G2, and PR0G3. 



ADD , PROG 1 , PROG2 , PROG3 



15.5.6 REP (SGL Replacement) Directive 



ALT* 

if an item is to be added from the SGEN ALT input unit 
(section 15.4.3), or 



LIB 



if processing from the SGL is to continue. If the former 
response is used, SGEN reads an object module from the 



This directive specifies the SGL control records and object 
modules to be replaced with new control records and /or 
object modules during nucleus generation. It has the 
general form 

R£P f p(Hp(2), ,p(n) 

where each p(n) is the name of a control record or an 
object module to be replaced. 
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When the name of the specified item is read from the SGL, 
the item is skipped and the message 

REPLACE p(n) 
READY 

appears on the OC unit. User response on the OC unit is 
either 

ALT* 

tf an item is to be replaced by one on the SGEN ALT input 
unit (section 15.4.3), or 



LIB 



if processing from the SGL is to continue. If the former 
response is used, SGEN reads an object module from the 
ALT unit and replaces p(n) with it in the SGL, then prints 
on the OC unit the message 

READY 

to which the user again responds with either ALT or LIB on 
the OC unit. 

Example: Specify that control records or object modules 
named PROGA and PROGB are to be replaced during 
nucleus generation. 

REP , PROGA, PROGB 

•ALT has a special form which allows searching the ALT 
device for a specified program. The form is 



ALT,n 

where 

name is one to six alphanumeric characters 

representing the TITLE name of the 
model to be added 



15.5.7 DEL (SGL Deletion) Directive 

This directive specifies the SGL control records and object 
modules that are to be deleted during nucleus generation.lt 
has the general form 

Oll,p(l),p(2), .p(n) 

where each p(n) is the name of a control record or an 
object module to be deleted. 

When the name of a specified item is read from the SGL, 
the item is skipped and processing continues with the 
following control record or object module. 

Example: Delete, during nucleus generation, all control 
records and object modules named PR0G1 and PR0G2 

DEL, PROG 1 .PR0G2 

15.5.8 LAD (Library Addition) Directive 

This directive specifies the SGL load-module package after 
which new load-module packages are to be added during 
library generation. It has the general form 

LA0,p(l),p(2) p(n) 

where each p(n) is the name of a load-module package 
from an SLM control directive after which new items are to 
be added. 

When the name of a specified load module package is read 
from the SGL, the program is processed and the message 

ADD AFTER p(n) 
READY 

appears on the OC unit. User response on the OC unit is 
either 

ALT 

if a load-module package ts to be added from the SGEN 
ALT input unit (section 15. 4. 3), or 



name can either specify an object module name or a TDF 
record name. When specified, ALT will search the alternate 
unit from its current position for the specified module. If an 
EOF is encountered prior to finding the module an SG08 
diagnostic occurs. To cause the alternate unit to rewind 
prior to each search, set Sense Switch 1 prior to entering 
the ALT directive. If no module name is specified, ALT will 
load from its current position. 



LIB 



tf processing from the SGL is to continue. If the former 
response is used, SGEN reads a module from the ALT unit 
and adds it to the library, then prints on the OC unit the 
message 

READY 



For example, to search for and load an object module 
named PGRM1, specify 

ALT,PGRM1 

To search for and load a TDF directive for TBLPOF, specify 
ALTJBLPOF 



to which the user again responds with either ALT or LIB on 
the OC unit 

Example: Specify that items are to be added, during 
library generation, after load-module packages named 
PR0G1, PR0G2, and PR0G3. 

LAD , PROG 1 , PR0G2 , PR0G3 
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15.5.9 LRE (Library Replacement) Directive 

This directive specifies the SGL toad-module package to be 
replaced with new load-module packages during library 
generation, it has the general form 

LRE.pO).p<2)....,pfn) 

where each p(n) iS the name of a toad-module package 
from an SLM control directive to be replaced. 

When the name of the specified load-module package is 
read from the SGL, the program is skipped and the 
message 

REPLACE p(n) 
HEADY 

appears on the OC unit User response on the OC unit is 
either 



ALT 



if module is to be replaced by one on the SGEN ALT input 
unit (section 15 A3), or 



LIB 



if processing f^om the SGL is to continue. If the former 
response is used, SGEN reads a module from the ALT unit 
and replaces p(n) with it in the SGL, then prints on the OC 
unit the message 

READY 

to which the usar again responds with etther ALT or LIB on 
the OC Unit. 

Example: Specify that load-module packages named 
PROGA or PROGB are to be replaced during library 
generation. 



Example: Oelete, during library generation, all load 
module packages named PROG1 and PROG2. 

LDB,PROG1 ,PROG2 



15.5.11 PIM (Priority Interrupt) Directive 

This directive defines the interruptsystem architecture by 
specifying the number of priority interrupt modules (PIMs) 
in the system, the interrupt levels to be enabled at system 
tnitialization time, and the interrupts to be manipulated by 
user-coded interrupt handlers. The PIM directive has the 
general form 

s(2);...;p(n) t q(n),r(n),s(n) 



where each 



P<n) 



q(n) 



r(n) 



s(n) 



LRE, PROGA, PROGB 



is an interrupt line number comprising 
two octal digits with the first being the 
PIM number and the second the line 
number within the PIM. The two digits 
must be preceded by a zero, e.g., 
002,011 

is the name (1 to 6 characters) of the 
task handling the interrupt The name 
format is TBxxxx, where xxxx is the 
hardware code name. For s(n) * 2, q(n) 
is the interrupt processor entry name. 

is the content of the interrupt event 
word in octal notation (see appendix F 
for nonzero values for standard 
hardware) 

is for an interrupt using the common 
interrupt-handler or 1 for a directly 
connected interrupt option t, of 2 for 
directly connected interrupt option 2. 
(Described in section 14.4.5) 



15.5.10 LDE (Ufersry Deletion) Directive 

This directive specifies the SGL load-module packages that 
are to be deleted during library generation. It has the 
general form 

U* f p(lXp(2)....jtfn) 

where each p(n) is the name of a load-module package 
from an SLM control directive to be deleted. 

When the name of a specified load-module package is read 
from the SGL, the load-module package Is skipped and 
processing continues with the following toad module 



If an interrupt line is to use the common interrupt handier, 
a TIDB is generated for the related mterrupt-processing 
routine, which can be in the VORTEX nucleus or in the 
foreground library. .._j 



If an interrupt line is to have a direct connection, the 
nucleyj . Failure to do so results in an error message. 

Example: Specify two interrupt lines, one handled by the 
common interrupt handler, the other directly connected, 
option 1. 

PIM r 002 t TBMT0A, 0000 1 , ; 003 , TBLP0B ,01,1 
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Note: The only interrupt used by the magnetic-tape I/O 
driver is the motion complete 

Note: The interrupt event word, r(n) for a Teletype or CRT 
(Teletype compatible) must be set to 01 for input interrupt 
on 02 for output interrupt. 



15.5.12 CLK (Clock) Directive 

This directive specifies the values of all parameters related 
to the operation of the real time clock. It has the general 

form 



CLK,ctock,counter, interrupt 



where 



clock is the number of microseconds in the 

basic clock interval 

counter '$ the number of microseconds in the 

free- running counter increment period. 
Stored in V$FREE but not used in 
VORTEX II. Its nominal value is 100. 

Interrupt is the number of milliseconds in the user 
interrupt interval: This value must be 
between 5 and 50. 



The value of interrupt, when not a multiple of 5 miltisec 
onds, is increased to the next multiple of 5 milliseconds; 
e.g., if interrupt is 31, the interrupt interval is 35 
milliseconds. 

Example: Sgeci^aJiasi<L£locJs JateryaLoi 100 m icrosec- 
o nds, a free-running counter rate of 100 microseconds, and 
a user interrupt interval of 20 milliseconds. 



Resident TIDBs are not created for the tasks defined on 
the TSK directives to be resident tasks. A TIDB is created 
each time a resident task is specified on a SCHED call . A 
resident TIDB is created at system generation for each task 
specified on a TDF directive (paragraph 15.6.2). 

These tasks are treated as user mode tasks and are not 
executed in map 0, Hence, I/O instructions cannot be 
executed by these tasks. Resident map tasks are added 
to the nucleus by adding the programs on the SGL between 
the CTL.21 and CTL.FART0C3 control records . Section 
14.4.8 describes resident tasks. 

Example: Specify that foreground-library tasks RTA, RTB, 
and RTC be made resident tasks. 

TSK,RTA,RTB,RTC 

15.5.14 DEF (Define Externa!) Directive 

This directive enters a name with a corresponding absolute 
value into the SGEN loader tables and the CL library. It has 
the general form 

DEF ( name(l),value(l);nameC2 J ),va/ue(2;; ..;name(n) 
vafue{n) 

Modules processed by either SGEN or LMGEN can refer 
ence any names defined by the DEF directive 

Example: Use the DEF directive for the VTAM LCB address 
in CTMXOA. The entry in CTMXOA for the LCB address 
might be 



EXT 

DATA 



V$LCW0 
VILCWO 



Then, the following DEF directive wou^d define the LCB to 
be at location 075000 

OBF.VILCWO, 075000 



CLK, 100, 100,20 



15.5.13 TSK (Foreground Task) Directive 

This directive specifies the tasks in the foreground library 
that are to be made resident tasks. It has the general form 

TSX,task(l),rasfc(2) task(n) 



where each tasfc(rt) is the name of an RMD foreground- 
library task that is to be made a resident task. 



15.545 EDR (End Redefinition) 
Directive 

This directive, which must be the last SGEN directive, 
specifies all special system -parameters, or terminates 
SGEN directive input. If only a rede j jjnffio n , of resident tasks 
is required, the EDR directive is of the form 

EDR.R 

but if a full SGEN is necessary, the EDR directive has the 
general form 

EDR,S,tk*>,ftack,part,H$t,kpun,map r ana/ysis 



If this directive is input as part of a full system generation, 
the names are those of tasks that will be built on the 
foreground library during the library building phase (sec- 
tion 15.7). 



where 
tidb 



is the number (01 through 0777, 
inclusive) of 25-word empty TIDBS 
allocated 



1517 



SYSTEM GENERATION 



stack 



is me size (0 through 037777, inclusive) 
of the storage and reentry stack 
allocation, which is equal to the number 
of words per reentrant subroutine 
multiplied by the number of levels 
calling the subroutine summed overall 
subroutines 



Systems without a WCS must delete certain WCS support 
software modules. In particular, the following directives 
should be included to delete the MIUTJL and WCSRLD 
tasks: 

LDE,FMIUTI 
LDE,FWCSRL 



part 



list 



kpun 



map 



analysis 



is the maximum number (6 through 20, 
inclusive) of partitions on an RMD in the 
system 

jiJh!LlHimt>e£^ 

list outj HJt, with typical values oXJAJsr 
J he line printer and 61 fa rttw Teletype 

is 26 for 026 keypunch Hollerith code, or 
29 for 029 code 

is L if map information is to be listed, or 
if it is to be suppressed 

is or blank if a complete bad track 
analysis is desired on all RMO's, or 1 if 
the bad track tables from the last SGEN 
are to be reused. If this parameter is 
omitted, a full analysis is performed. A 
vaJue of 1 may be entered only when an 
analysis has been made on a previous 
SGEN effort. If SGL is on slave disc, 
bypass (SET 1) the bad track analysis. 



In addition, the following directives may optionally be used 
to delete the remaining microprogramming support mod- 
ules. These modules may be used on systems without WCS, 
but their deletion will make extra space available in the 
background library. The following directives delete the 
microprogram assembler and the simulator: 

LDE,BHIDAS 
LDK.BMICSX 

Systems including VTAM require a DEF directive to define 

the LcB address. The format is: 

DEF, VSLcWn, aaaaaa where n is the DCM number 
and aaaaaa is the LcB address for the DCM 

Systems including a statos printer /plotter require a DEF 
directive to define the bed width. The format is 



DEF, ViSWcm.a 
where c *» controller number 
m « model code 
a * for 8-1/2 inches 

1 for 11 inches 

2 for 14-5/8 inches 

3 for 22 inches 



4 = with SLIB 

5 * with SLIB 

6 = with SLIB 

7 = with SLIB 



Bad track or RMD partitioning analysis is performed 
following input of the EDR directive. When that process is 
complete, the VORTEX nucleus or resident-task processor is 
loaded into main memory. 

Examples: Specify redefinition of resident tasks only. 
EDR,R 

Specify full system generation with no stack area, a 
maximum of five partitions per RMD, 44 lines per page on 
the fist output, 026 keypunch mode, and a list map, and a 
new bad track analysis is wanted. 

EDR, S, 0,0,5, 44, 26, L 

Specify full system generation with 0500 addresses in the 
stack area, a maximum of 20 partitions per RMD, 30 lines 
per page on the list output. 029 keypunch mode, and sup- 
pression of the list map. Assume bad track tables from 
the last SGEN are still good, and reuse them 

EDR, S, 0,0 500, 20, 30, 29,0, 1 



15.5.16 Required Directives 

VORTEX system including writable control store (WCS) 
must include an EQP, WCS. directive. 



15.6 BUILDING THE VORTEX NUCLEUS 

11 a full system generation has been requested by the S 
form of an EDR directive (section 15.5.15), the nucleus 
processor is loaded upon completion of directive process- 
ing. Once loaded, the nucleus processor reads the SGL 
routines and builds the VORTEX nucleus as specified by 
the routines and the SGEN control records. 

There are three SGEN control records used in building the 
nucleus: 

SLM Start load module 

TDF Build task-identification block 

MEM Default extra memory pages 

END End of nucleus library 



Normally these control records are used only to replace 
existing SGL control records. 

VORTEX nucleus processing consists of the automatic 
reading of control records and object modules from the 
SGL, and, according to the specifications made by SGEN 
directives, either ignoring the item or incorporating it into 
the VORTEX nucleus. The only manual operations are the 
addition and replacement of object modules during system 
generation. In these cases, follow the procedures given in 
section 15.5.5 and 15.5.6, respectively. 
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15.6.1 SLM (Start Load Module) 
Directive 

This directive specifies the beginning of a load module. Its 
presence indicates the beginning of the system initializer or 
VORTEX nucleus The directive has the general form 

SLM, name 

where name is the name of the load module that follows the 

directive 

Example: Indicate the beginning of the VORTEX nucleus. 
SLM, VORTEX 



where 

name 

exec 

Ctrl 



stat 



is the name (1 to 6 alphanumeric 
characters) given to the TIDB for linking 
purposes 

is the name (1 to 6 alphanumeric 
characters) associated with the 
execution address of the task 

ts the name (1 to 6 alphanumeric 
characters) of the controller table 
required for Teletype and CRT 
processing tasks, or is for any other 
task 

is the 16 bit TIDB status word where the 
settings of the individual bits have the 
significance shown in table 15-5 



15.6.2 TDF (Build Task-Identification Block) 
Directive 

This directive specifies all parameters necessary to build a 
task identification block in the VORTEX nucleus. It has the 

general form 

TDF,name,*x*c,ctrl.stat,level ,V75 ' 



tevl is the priority level of the related tasks 

V75 specifies long TIDB for V75 system 

Example: Define a foreground resident task PROG1 
on priority level 10 to execute on boo£. 

The TDF directive causes a resident TIDB to be created for 
the specified task. The task itself may or may not be a 
resident task, as defined by the status word (stat) See 
section 15.5.13 for generation of resident tasks without 
resident TIDB. 



Bit 

15 



Tab)* 15-5. TIDB Status-Word Bits 
When Set Indicates Explanation 



Interrupt suspended 



The task is suspended during the 
processing of a higher priority 
task. The contents of volatile 
registers are stored in TIDB 
words 12*16 (interrupt stack). 



14 



Task suspended 



13 



Task aborted 



The task is suspended because 
of I/O or because it is wait 
ing to be activated by an inter 
rupt, time delay, or another 
task. T he task is a ctivated 
when ever this bit is zera^or 
if TIDB word 3 has an inter 
rupt pending and the _ jask_ex- 
pacts the interrupt. 

The task is not activated. All 
stacked I/O is aborted, but 
currently active I/O is com 
pleted. 
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Table 15-5. TIDE Status-Word Bits (continued) 
Bit When Set indicates Explanation 



12 



Task exited 



The task is not activated. All 
stacked and currently active 
I/O is completed. 



11 



10 



TIDB resident 



Task resident 



Foreground task 



The TIDB (drivers, task 
interrupt processors, resident 
tasks, and time-scheduled tasks) 
is resident and not released 
when the task is aborted or 
exited. 

The task is resident and not 
released when aborted or 
exited. 

The task is in protected fore 
ground. 



Check point flag 



Task scheduled by 
time increment 



Time delay active 



Set: may be check pointed by a lower 
priority task. 

Reset: may not be check pointed by a 
lower priority task. 

The task becomes nonsuspended 
when a specified time interval 
is reached. 

The clock decrements the time 
counter that, upon reaching zero, 
clears bit 14. 



Task checkpointed 



Error in task 



Task interrupt expected 



The background task ts check 
pointed and suspended. I/O is 
not activated. 

The task contains an error that 
will cause an error message to 
be output 

A task interrupt ts expected 



Overlay task 
Task-schedule this t^sk 



Task searched, alio 
cated and loaded 



The task contains overlays 

The scheduling task is suspended 
until the scheduled task exits 
or aborts .. 

The task is loaded in memory and 
is ready for execution. 



15.6.3 END Directive 

This directive indicates the end of the system initializer or 
the VORTEX nucleus. It has the form 



END 



Example: Indicate the end of the system initializer. 



END 

15.6.4 MEM Directive 

This optional directive performs the same function as the 
same directive in LMGEN (see section 6.2.7). The directive 
has the general form 

MEM.n 
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where 



is the number of extra pages desired. 



This directive, if used, must appear after the last ESB 
directive and before the END directive. 



15.6.5 Memory Parity Considerations 
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load module, and specify certain parameters to the load 
module. The group of object modules and control records 
used to construct a load module is called a load-module 
package (LMP). Figure 15 5 shows an LMP for a load 
module without overlays, and figure 15-6 shows an LMP for 
a load module with overlays. Each LMP runs from a SLM 
control record to an END control record, and includes all 
modules and records between the SLM and END. 



Memory parity is not a supported feature under VORTEX. 
For those systems which require the use of memory parity, 
the user may wrtte his own memory-parity service routine 
(see section 14) and add it to the system. The following are 
considerations when using memory parity: 

• The memory parity interrupt trap must be an even 
modulo-8 address, e.g., 010, 0100, 01 10, 0200, etc. The 
exact address depends upon the number of PtMs in 
the system. For example, a system with 3 PIMs can 
use any of the following addresses: 0160, 0170, 0200, 
0230, 0240, 0250, 0260, 0270, or 010. If 4 PIMs are 
m the system, then any of the above addresses except 
for 0160 and 0170 may be used. In the case where all 
8 PIMs are used, the only available address will be 
010. 



SLM, name! 



TID.name2, 



Object Modules Comprising 
the Root Segement 



ESB 



EN0 



NOTE: 



Alphanumeric control record 



For trap addresses between 01 00 and 0277, the SGEN 
P!M directive, specifying the direct connect option, 
may be used to link up the trap address with the users 
memory-parity routine If a trap address of 01 is used, 
the PIM directive cannot be used In this case, the 
easiest means of linking the trap address and the 
service routine would be to modify the "low-core" 
module (VSLMEMBK) to specify an EXT to the user's 
interrupt service routine 

No enable/disable memory parity instructions are 
required and hence no changes are required for the 
system initializer 



Figure 15-5. Load Module Package for Module Without 
Overlays 



There are five SGEN control records used in building the 
library: 



SLM 
TID 
OVL 
ESB 
END 



Start load module 

Task identification block specification 

Overlay 

End of segment 



15.7 BUILDING THE SYSTEM LIBRARIES AND 
RESIDENT TASK CONFIGURATION 



if a full system generation has been requested by the S 
form of an EDR directive (section 15.5.15), the library 
generator is loaded upon completion of nucleus processing. 
If only reconfiguration of resident tasks has been requested 
(R form of the EDR directive), the resident task configura- 
tor is loaded immediately after directive processing. 

A toad module is a logically complete task or operation that 
can be executed by the VORTEX system in foreground or 
background. It resides in the foreground or background 
library, or in the user library. Load modules are constructed 
from sets of binary object modules interspersed with 
alphanumeric control records. The control records indicate 
the beginning and end of data for incorporation into each 



Library processing consists of the automatic reading of 
control records and object modules from the SGL, and 
construction of the library from these inputs. The only 
manual operations are the addition and replacement of 
load modules. In these cases, follow the procedures given in 
sections 15.5.8 and 15.5.9, respectively. 



Resident-task configuration takes place upon completion of 
library processing. AH tasks specified by TSK directives 
(section 15.5.13) are copied from the foreground library 
into the VORTEX nucleus, thus becoming resident tasks. To 
change the resident-task configuration of a previously 
generated system, input the TSK directives followed by the 
R form of the EDR directive (section 15.5.15), thus 
bypassing nucleus and library processing and allowing the 
resident task configurator to alter the existing system. 
Note: If a specified program is no! found in the 
foreground library, configuration continues, but an appro 
priate message is output. 
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15.7.1 SLM (Start UUP) Directive 

This directive indicates the start of an LMP. It has the 
general form 

$LM,name 

where name is the name of the LMP that begins with this 
directive. 



Example: Indicate the start of the LMP named ABC. 
SLM, ABC 



15.7.2 TID (TfiDB Specification) 
Directive 



This directive contains th9 parameters necessary for the 
generation of the task-identification block required for each 
generated load module. The TID directive has the general 
form 



TID,name ( mode,ovly,iun 



where 



name 



mode 



ovty 



lun 



is the name (one to six alphanumeric 
characters) of the task 

s 1 if the task is a background task, or 2 
ii it is a foreground task 

is the number of overlay segments, or 
if the task has no overlay segments, 
(note that the value 1 is invalid) 

is the number of the logical unit onto 
which the task is to be cataloged 



Note, tf a specified program is not lound in the foreground 
library, configuration continues, but an appropriate mes- 
sage is output. 



SLM, name 1 



TID,name2,. . 



Object Modules Comprising 
the Root Segment 



ESB 



OVL,name3, 



Object Modules Comprising 
the First Overlay Segment 



ESB 



OVL,name4,. 



Object Modules Comprising 
the Second Overlay Segment 




ESB 



ENO 



NOTE: 

* - Alphanumeric control record 



Figure 15-6. Load Module Package for Module With 
Overlays 



Once a TID directive is input and processed, object 
modules »n input, processed, and output to the specified 
logical unit until the ESB directive (section 15.7.4) is found. 

Examples: Specify a TiOB for a task PROG1 without 
overlays for cataloging on the BL unit (105). 

TID,PROG1,1,0, 105 



Specify a TIDB for the task PROG2 with four overlay 
segments for cataloging on an FL unit (106). 



TID,PROG2,2,4, 106 



15.7.3 OVL (Overlay) Directive 

This directive indicates the beginning of an overlay 
segment. The OVL directive has the general form 



OVL,tegname 

where segname is the name (one to six alphanumeric 
characters) of the overlay segment. 



Example: Indicate the beginning of the overlay segment 
SINE. 

OVL, SINE 
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15.7.4 ESB (End Segment) Directive 

This directive indicates the end of a segment, i.e., that all 
object modules have been loaded and processed. The 
directive has the form 



ESB 



this, it uses the contents for WCS which were saved on a 
disc file the last time WCS was loaded. At this point, 
however, WCS has not yet been loaded. Thus, the reload 
task cannot restore WCS and exits after outputting the 
above messages. At this time, the OM library should be 
loaded and build on the RMD using FMAIN. 



The ESB directive causes the searching of the CL library, 
which was generated during nucleus processing, to satisfy 
undefined externals. 

The ESB directive concludes both root segments (following 
TID, section 15.7.2) and overlay segments (following OVL, 
section 15.7.3) of a load module. 

Example: Indicate the end of a segment. 

ESB 



The OM library is provided as job streams as the second 
through thirty-fifth files on the SGL An EOF separates the 
SGL from the OM stream. A system generation leaves 
magnetic tape and card SGLs prior to this EOF, thus it 
must be skipped awr before executing the OM job stream. 
For disc SGLs the OM library object modules are on the 
second partition of the disc pack <Dcu8). Refer to the 
VORTEX/VORTEX II Installation Manual for details. 



15.7.5 END (End Library) Directive 

This directive indicates the end of load-module generation. 

It has the form 

END 
Example: Specify the end of load-module generation. 
END 



The VORTEX system is now operating with the peripherals 
in the status specified by TID control records. 



If the EDR directive specified a listing, linking information 
is listed on the US unit during nucleus processing and 
library generation. Regardless of the EDR directive, RMD 
and resident-task information is listed during nucleus 
processing or resident-task configuration, respectively. 
Figures 15-7 through 15-10 show the listing formats of load 
maps for the VORTEX nucleus, the library processor, the 
RMD partitions, and the resident tasks. 



15.8 SYSTEM INITIALIZATION AND 
OUTPUT LISTINGS 

Upon completion of load-module processing, SGEN outputs 
on the OC and LIS units the message 

VORTEX SYSTEM READY 

The system initializer and VORTEX nucleus are then loaded 
into memory, the initializer is executed to initialize the 
system, and the nucleus is executed to begin system 
operation. If writable control store is present in the system, 
the following messages will appear on the OC device at this 
time: 

IO10,WCSRLD 

FILE WCS IMG NOT POUND 

WCS RELOAD ABORTED 

These messages are output by the WCS reload task. In 
WCS systems, this task is automatically scheduled upon 
loading the system in order to restore WCS contents. To do 



CORE RESIDENT LIBRARY 
NAME LOCATION 



AAA 

BBB 



017285 

021255 



ZSZ 075777 

NONSCHEDULED TASKS 

NAME LOCATION 

TBABC 072620 

TBDBP 074640 



TBXY2 



076400 



Figure 15 7. VORTEX Nucleus load Map 
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SLM,BGTSKX 
TXD.JCP, 1,0, 105 
ES3 

MOP A 032556 
QRS R 000200 



PAGES (OCTAL) 



TUV 


A 




032501 


SLM, 


f J?GTSKI 






TID, 


V$0?CM,2, 


,8 


, 106 


ESB 








GHI 


R 




000010 


JKX, 


R 




000012 



ALLOCATED TO 



PAGE SYSTEM DATA 

1 - 50 UNALLOCATED 

51 - 72 NUCLEUS PROGRAM MODULE 

72 - 7 5 NUCLEUS TABLE MODULE 

75 GLOBAL PCB PAGE 

7 5 FOREGROUND BLANK COMMON 

100 - 177 UNALLOCATED 
VORTEX SYSTEM READY 

Figure 1511. Physical Memory Atoeatton 



MNO R 000077 

Figure 15-8. Library Processor Load Map 



RMD PARTITIONING 






NAME 


FIRST 


LAST 


BAD 




TRACK 


TRACK 


TRACKS 


D00A 


0007 


0008 


0000 


D00B 


0009 


0028 


0000 


D00C 


0029 


0053 


0000 


D00D 


0054 


0093 


0000 


D00E 


0094 


0101 


0000 


D00P 


0102 


0119 


0000 


DOOG 


012G 


0137 


0000 


DOOH 


0138 


0203 


0000 


D01A 


0001 


0039 


0000 


D01B 


0040 


0099 


0000 


D01C 


0100 


0149 


0000 


D01D 


0150 


0203 


0000 



Figure 15-9. RMD Partition Listing 



MEMORY 


RESIDENT TASKS 


NAME 


LOCATIONS 


PROG1 
PROG 2 
PROG 3 
PROG 4 


014630 
014630 
NOT POUND 
014500 



Figure 15-10. Resident-Task Load Map 



15.9 SYSTEM GENERATION EXAMPLES 

EXAMPLE 1 

Problem: Generate a VORTEX system using the following 
hardware: 

a. Computer with 32K main memory 

b. A model 70 7610 (620 37) disc unit with device address 
016onBlC20 

c. Teletype keyboard /printer 

d. Card reader 

e. Two buffer interlace controllers (BICs) with device 
addresses 020 and 022 

f. One priority interrupt module (PIM) with device 
address 040 

g. No writable control store 

and having the characteristics listed below: 

a. Foreground common size - 0200 

b. Storage/reentry stack area size - 0200 

c. Number of disc partitions * 9 

d. All eight interrupt lines connected through a common 
interrupt handler - BIC1, 1 - BIC2, 2 « CR, 3 « 
Disc seek, 4 - TY read, 5 « TY write, 6-7 
unaligned 

e. One user-coded task added to the resident module 
(PROG1) 

f . JCP replaced with a new version 

g. Die user-coded load module added to the background 

library (after LMGEN) (PROG2) 

h Tha system file listed after system generation 
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Procedure: 
Step 

I 



User Action 

Load and execute the card 
reader loader (table 15 1) 



On the OC unit, input 

DIR-TY00A.01 
LIB-CR00A.O3O 
ALT«CR00A,030 
US - TYOOA.Ol 
SY5-DOOB.016.02O 

On the Teletype (DIR unit), 
type 

CLK.100,100,20 

MRY.757777,0200,32 

EQP t 008,016 t l f 020,3 

EQPJY0A,01,l t 0,0 

EQP.CROA.030,1,022,0 

PRT t D00A,2,C;D00B f 20,F 

PRT,D0OC,25,E;D00D,40,D 

PRT t D00E,8,S;D00F,18,B 

PRT,D00G,1S,*;D00H ( $V 

PRT.D001.1V 

ASN.l » TY00,2 m TY00 ? 3 » TYOO 

ASN ( 4 m CR00.5 - TY00 f 6 • CROO 

ASN.7 - 0001,8 - D00H t 9 « DOOG 

ASN,10 m O00H f 11 » TY00,12 - TYOO 

ASN,180 - D0OH.181 * DOOI 

PIM,03,TBDOB,01,0;02,TBCROA t 01,0 

PWI,O3 t T8O0B,01,0;O4,TBTY0A t 0l,0 

PIM t 05,TBTY0A t 02,0 

TSK.PROG1 

LR£,BJCP 

LAD.BLMGEN 

LDE.FMIUTI 

LDE.FM8CSI 

LDE.F&U0A8 

LDE.FNCSRL 

EDR t s,2o,o2oo,9,6i,26,L 

Load revised version of 
BJCP load module in the 
card reader, and on DIR 
type: 

ALT 

Load the remainder of the 
load module library in the 
card reader, and on DIR type 

LIB 



SGEN Response 

loads the I/O interrogation 
routine punched cards from 
the card reader, and outputs 
on the OC unit 

I/O INTERROGATION 

Loads the SGEN drivers and 
directive processor, and 
outputs 

INPUT DIRECTIVES 



Processes the directives, 
partitions the disc, loads 
the nucleus processor and 
builds the nucleus, loads 
the library processor and 
builds the library until 
load module JCP is encoun 
tered, and outputs 

REPLACE BJCP 
READY 



Load the PR0G1 load module 
in the card reader, and on 
DIR type 



Reads and processes the 
new load module, and 
outputs: 

READY 

Processes the load mod 
ule library until the 
completion of LMGEN, 
and outputs 

ADD AFTER BL68GEN 

READY 

Reads and processes PRCG: 
and outputs 
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Procedure: (continued) 

St«p Uwr Actson 

ALT 



Load the PR0G2 load module 
in the card reader, and on 
DIR type 

ALT 

Load the remainder of the 
toad module library in the 
card reader, and on DIR type 

LIB 



None 



SGEN Response 



READY 



Reads and processes PROG2, 
and outputs 

READY 



Processes the remainder of 
the load module library, 
copies PROG1 from the FL 
unit to the VORTEX nucleus, 
lists the resident task in- 
formation, and outputs on 
OC and LIS 

VORTEX SYSTEM READY 

Loads and initializes the 
VORTEX nucleus 



EXAMPLE 2 

Problem: Replace the current resident tasks in the 
foreground library with the tasks listed below in an 
operational VORTEX system. Assume the SQL is on 
magnetic tape unit 0. The system has a line printer and a 
620-48 RMD on DA014. ALT is on the slave MT. 

PROG1 
ABC 
TEST 
EFG 



Procedure; 
Step 

1 



User Action 

Load and execute the magnetic 
tape loader (table 15-1) 



On the OC unit, input 

DIR-TV00A.01 

LIB « MT00A.01Q 

ALT-MT01A.010 

LIS-LPO0A,035 

SYS - DOOA2,014,02G 

On the Teletype (DIR unit), 
type 

TSK.PROG1.ABC 

TSK.TEST.EFQ 

EDR.R 



None 



SGEN Response 

Loads the I/O interrogation 
routine from magnetic tape 
and outputs from the OC unit 

tO INTERROGATION 

Loads the SGEN drivers and 
directive processor, and 
outputs 

INPUT DIRECTIVES 



Processes the directives, 
loads the resident- task 
processor, enters the 
PROG1, ABC, TEST, and 
EFG load modules from FL, 
lists resident information, 
and outputs on OC and LIS 

VORTEX SYSTEM READY 

Loads and initializes 
the VORTEX nucleus 
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The VORTEX system-maintenance component (SMAIN) is a 
background task that maintains the system- generation 
library (SOL). The SGL (figure 15 2) comprises afl object 
modules and their related control records required to 
generate a generalized VORTEX operating system 

16.1 ORGANIZATION 

SMAIN is scheduled for execution by inputting the job 

control -processor (JCP) directive /SMAIN (section 4.2.21). 



Once SMAIN is so scheduled, loaded, and executed, SMAIN 
directives can be input from the SI logical unit to maintain 
the SGL. No processing of the SGL takes place before all 
SMAIN directives are input and processed Then user 
specified object modules and /or control records are added, 
deleted, or replaced to generate a new SGL. 

SMAIN has a symbol-table area for 200 symbols at five 
words per symbol. To increase this, input a /MEM directive 
(section 4.2.5), where each 512-word block will increase the 
capacity of the table by 100 symbols. 



SYSTEM INPUT 

(SI) 
LOGICAL UNIT 



SYSTEM OUTPUT 

(SO) 
LOGICAL UNIT 



LOGICAL UNIT 
SPECIFIED BY 
SMAIN DIRECTIVE ir 

OLD SYSTEM 
GENERATION 
LIBRARY (SGL) 



LOGICAL UNIT 
SPECIFIED BY 
S'/AIN DlKECTIVf 

NEW OBJECT 
MODULES AND 
CONTROL 
RECORDS 




LOGICAL UNIT 

SPECIFIED BY 

SM AIN DIRECTIVE OUT 

NEW SYSTEM 
GENERATION 
LIBRARY (SGL) 



tnion 



SGL AND SMAIN 

DIRECTIVE 

LISTINGS 



LIST OUTPUT 

ILO) 
LOGICAL UNIT 



Figure 161. SMAIN Block Diagram 
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INPUTS to the SMAIN comprise 

a. System-maintenance directives (section 16.2) input 
through the SI logical unit. 

b. The did SGI input through the logical unit specified by 
the IN directive (section 16.2.1). 

c New or replac&nent object modules and/ or control 
records input through the logical unit specified by the 
ALT directive (section 16.2. 3). 

d Error- recovery input s entered via the SO logical unit. 

System-maintenance directives specify both the changes to 
be made in the 'SGL, and the logical units to be used in 
making these changes. The directives are input through the 
S! logical unit ard listed, when specified, on the LO logical 
unit, if the SI logica! unit is a Teletype or a CRT device, the 
message SM** »s output to indicate that the SI unit is 
watting for SMASN input. 

The old SGL contains three types of records: 1) control 
records and comments (ASCII), 2) the system -generation 
relocatable loader and 300TLODR (the only SGL absolute 
core image records), and 3) r eiocatabie object modules 
such as are ou t put by the DAS MR assembler and the 
FORTRAN compter " 

New or replacement object modules and/or control records 
have the same specifications as their equivalents in the old 
SGL. 

Error-recovery inputs are entered by the operator on the 
SO logical unit tc recover from errors in SMAIN operations. 
Error messages applicable to this component are given 
Appendix A. 16. Recovery from the type of error represented 
by invalid directives or parameters is by either of the 
following: 



If recovery is not desired, input a JCP directive (section 
4.2) on the SO unit to abort the SMAIN task and schedule 
the JCP for execution 

OUTPUTS from the SMAIN comprise: 

a. The new SGL 

b. Error messages 

c. The listing of the old SGL, if requested 

d . Direc tive i mages 

The new SGL contains object modules and control records. 
It is similar in structure to the old SGL. 

Error messages applicable to SMAIN are output on the SO 
and on LO logical units. The individual messages, errors, 
and possible recovery actions are given in Appendix A. 16. 



The listing of the old SGL is output, if requested, on the LO 
unit. The output consists of a list of all control records and 
the contents of all object modules. At the top of each page, 
the standard VORTEX heading is output. 

The image of an object module is represented by the 
identification name of the module, the date the module 
was generated, the size (in words) of the module (0 for a 
FORTRAN object module), and the external names refer 
enced by the module, in the following format: 



id-name 



date 



entry-names external -names 



Directive images are posted onto the LO unit, thus 
providing a hardcopy of the SMAIN directives for perma 
nent reference. 



a. Input the character C on the SO unit, thus directing 
SMAIN to go to the SI unit for the next directive. 

b Input the corrected directive on the SO unit for 
processing. The next SMAIN directive is then input 
from the Si unit. 

Recovery from errors encountered while processing object 
modules and/or control records is by either of the 
following: 

a. Input the character R on the SO unit, thus directing a 
rereading and reprocessing of the last record. 

b Input the character P on the SO unit, thus directing a 
rereading and reprocessing from the beginning of the 
current object module or control record. 

In the last two cases, repositioning is automatic if the erro r 
inv olves a magne t ic-tape unit or an RMO . Otherwise, such 
repositioning is manual. 



16.1.1 Control Records 

In SMAIN there are two types of control record: 

a SGL delimiters 

b. Object-module delimiters 

SGL delimiters divide the SGL into five parts. Each part is 
separated from the following part by a control record of the 
form 

CTL.PARTOOOn 

where n is the number of the following part, and the SGL 
itself is terminated by a control record of the form 

CTL.ENDOrSGL * 
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Within SMAIN directives, these control records are refer- 
enced in the following format 

PARTOOOn 
ENDOFSGL 

Object-module delimiters precede and /or follow each group 
of object modules within the SGL Each delimiter is of one 
of the forms 

SLM, name 
TID,name 
OVL , name 
TOP , name 
ESS 
END 

The control records containing a name can be referenced 
by use of the name alone in SMAIN directives. These 
control records and their uses are described in the section 
on the system-generator component (section 15). 

A set of object modules preceded by an SLM control record 
and followed by an END control record is known as a load- 
module package (LMP). To add, delete, or replace an entire 
LMP, merely reference the name associated with the SLM 
control record. Thus, if the directive specifies deletion and 
includes the name associated with the SLM record, the 
entire LMP is deleted. Additions and replacements operate 
analogously. 



16.1.2 Object Modules 

Relocatable object module outputs from the DAS MR 
assembler and the FORTRAN compiler are described tn 
appendix G. 



16.1.3 System-Generation Library 

The SGL is a collection of system programs in binary-object 
form, and of control records in alphanumeric form, from 
which a VORTEX system ts generated. The structure of the 
SGL ts described in section 15. 



16.2 SYSTEM-MAINTENANCE DIRECTIVES 

This section describes the SMAIN directives: 



IN 

OUT 

ALT 

ADD 
REP 
DEL 
LIST 
END 



Specify input logical unit 
Specify output logical unit 
Specify input logical 
unit for new SGL items 
Add items to the SGL 
Replace SGL items 
Delete items from the SGL 
List the old SGL 
End input of SMAIN directives 



SMAIN directives begin in column 1 and comprise 
sequences of character strings having no embedded 
blanks. The character strings are separated by commas (,) 
or by equal signs (-). The directives are free-form and 
blanks are permitted between the individual character 
strings of the directive, i.e., before or after commas (or 
equal signs). Although not required, a period (.) is a line 
terminator. Comments can be inserted after the period. 

The general form of an SMAIN directive is 



name,p(Up(2),...,p(n) 



where 



name is one of the directive names given 

above (any other character string 
produces an error) 

each p(n) is a parameter defined below under 
the descriptions of the individual 

directives 



Numerical data can be octal or decimal. Each octal number 
has a leading zero. 

For greater clarity in the descriptions of the directives, 
optional periods, optional blank separators between 
character strings, and the optional replacement of commas 
(,) by equal signs ( - ) are omitted. 

Error messages applicable to SMAIN directives are given in 
Appendix A. 16, 



16.2.1 IN (Input Logical Unit) Directive 

This directive specifies the logical unit from which the old 
SGL is to be input. It has the general form 



IN, km, key, filename 



where 



lun 

key 

filename 



is the name or number of the logical unit 
to be used for the input of the old SGL 

is the protection code, if any, required to 
address km 

is the name of the input file only when 
kin is aq RMD partition with a directory 



There is no default value for km. If it is not specified, any 
attempt at SGL processing will cause an error message 
output. 

Once specified, the value of km remains constant until 
changed by a subsequent IN directive. Each change of km 
requires a new !N directive. 
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If km specifies an &MD partition, the RMD is rewou ndjo 
the first sector following the s jar t o f tr^j^artitio J rH &etofe 
^anxprpc esstng iafres place. 

Examples: The old SGL resides on logical unit 4, the PI 
unit. Specify this unit to be the SGL input unit. 

IN. U 



The old SGL resides on logical unit 107, which requires the 
protection code G. Specify this unit to be the SGL input 
unit. (This is a non-directorted partition.) 



IN, 107, G 



16.2.3 ALT (Alternate Logical Unit) 
Directive 

This directive specifies the logical unit from which new 
object module(s) and /or control record(s) are to be input to 
the new SGL. It has the general form 



ALT,kin,key, filename 



where 



lun 



is the name or number of the logical unit 
to be used for the input of new items to 
the SGL 



16.2.2 OUT (Output Logical Unit) Directive 

This directive specifies the logical unit on which the new 
SGL is to be output, it has the general form 



OUT.tun, key, Hteriame 



where 



lun 



key 



is the name or number of the logical unit 
to be used for the output of the new SGL 



is the protection code, if any, required to 
address lun 



filename is the name of the output file when lun is 
an RMD partition 

The default value of ton is zero. When lun is zero by 
specification or by default, there is no output logical unit. 

Once specified, the value of km remains constant until 
changed by a subsequent OUT directive. Each change of 
lun requires a new OUT directive. 

If km specifies an RMD partition, the RMD is rewound to 
the first sector following the PST before any processing 
takes place. The PST comprises one entry defining the 
entire RMD. 



Examples: Specify the PO logical unit, unit 10, to be the 
output unit for the new SGL. 

OUT , 1 

Specify that there is to be no output logical unit. 

OUT , 



key is the protection code, if any, required to 

address lun 



filename is the name of the input file when lun is 
an RMD partition 

There is no default value for lun. If it is not specified, any 
attempt to input new object modules or control records to 
the SGL will cause an error message output. 

Once specified, the _yalue_ of tun remains constant until 
£t^!li?^L?^^seojjent"ALT direcliveTEach^chan^oThm 
requires a new ALT directive. " '""" " 

Examples: Specify that new object modules and control 
records are to be input to the SGL from the Bl logical unit 
only. 

ALT ,6 

Make the same specification where Bl is an RMD partition 
without a protection code. Use file Ft LEX. 

Note: $MA1N does not ac cept packed binary. Use IOUTIL 
to unpack binary if necessary . " " *" ^~ 



16.2.4 ADD Directive 

This directive permits the addition of object modules and/ 
or control records during the generation of a new SGL, the 
additions being made immediately after each of the items 
specified by the parameters of the ADD directive. The 
directive has the general form 

ADD,pa),p(2) p(n) 

where each p(n) is the name of an object module or control 
record after which additions are to be made. 
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SMAIN copies ob ject module and co ntrol records from th e 
old SGL into the now SQL up to and inducting an item 
specified by one of the parameters, p(n\ of the ADD 



directive. After this Hem is co 



ADO AFTER p(n) 
SM** 



Note met PAtfTOOOl does not neve to precede LMP In me 
oW SQL. If the positions of the items are reversed retath* 
to their order in the directive, the order of messafes m be 
reversed. jn_ajy e— t the Hems o n _tho togteal jejH 
by ALT must be In the order in which they are to 



is output to indicate that SMAIN is waiting for a control 
character (Y or N) to be input on the SO logical unit. 

If me control chancier input is Y, SMAIN adds the next 
*i9£tjpodiiie or control racord. contained on the logical 
unit specified by the^flLT directive (section 16.2.3), then 
repeats the message requesting another control character. 
This continues until the control character input is N. 

If me control character input is N, SMAIN assumes the 
additions at this point are complete. It continues copying 
from the old SGL and output! the message 

END REPLACEMENTS 



entire process is repeated when the next item specil 
by one of the parameters, p(n), of the ADD directive is 
found. The items in the directive need not be in the same J 9 
as they appear on the old SGL 



16.2.5 REP (Rtplact)) Directive 

This directive permits the replacement of object modules 
and/or control records during generation of a new SGL 
The directive has the general form 

n&Ml%p<2) t ...,p(n) 

where each p(a) is the name of an object module or control 
record that is to be replaced. 

SMAIN co ffgj>bjort mod ules and control re cords j romthe 
QJgJSBLtoitOiliiiTSfl^^ one spe cified 

by one of the parameters, p (n), of the REP directive. SMAIN 
then reads the Kern to'be rep laced, but does not copy it 
i nto the new SQL Attar triis ir^S BBg^e^^^" 

REPLACE p(n) 
SM** 



Exempts: During generation of a new SGL add object 
module(s) and/or control recoroXs) after the old SGL 
control record PART0001 and after the old SGL object 
module IMP, the added items to be input from the logical 
unit specified by the ALT directive. Input 

ADD,FART0001 # LMF 

then, when the message 

ADD AFTER PART0001 
SM** 

appears, input the control character Y. SMAIN then inputs 
the next item on the logical unit specified by the ALT 
directive, and again outputs the message 

SM** 

and awaits another control character. If more is to be 
added here, input Y. If no more additions are required at 
this point, input N. After receiving the N, SMAIN outputs 
the message 

END REPLACEMENTS 

and continues to read the old SGL and copy it into the new 
SGL up to and including the object module LMP. SMAIN 
then outputs the message 

ADO AFTER LMF 
SM** 

at which time the process is repeated. 



is output to indicate that SMAIN is watting for a control 
character (Y or N) to be input on the SO iogfcal unit. These 
control characters operate just as m the ADD directive 
(section 16.2.4), allowing the addition (in this case, 
replacement, since the parameter item was not copied into 
the new SGL) of new items to the SGL The items in the 
directive need not be in the same order as they appear in 
the old SGL 

example: During generation of a new SGL replace the old 
SGL object module IOCTL with object modules and/or 
control records from the logical unit specified by an ALT 
directive (section 16.2.3). Input 

REPLACE, IOCTL 
then, when the message 

REP IOCTL 
SM** 

appears, continue as for an ADD directive (section 16.2.4). 



16.2.6 DEL (De»ttt) Directive 

This directive permits the deletion of object modules and/ 
or control records during generation of a new SGL The 
directive has the general form 

WLMn°<2) p(n) 



p(n) is the name of an object module or control 
record that is to be deleted. 
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SMAIN copies object modules and control records from the 
old SQL into the new SCU. until it encounters one specified 
by or* of the p&«ir&«te^ **)> «t tt* DEI Orotic SMAIN 
then reads the item to be deleted, but does not copy it into 
the new SGL The items in the DEL directive need not be in 
the same order as they appear on the old SGL. 

If a listing of the old SGL is specified either by a LIST 
directive (section 16.2.7) or by the L parameter of an END 
directive (16.2.3), the deleted items are preceded on the 
listing by asterisks (*). 

Example: Dunng generation of a new SGL, delete the 
following old SGL items: object module IOST and control 
record LMGENCTL 

DEL , IOST , LMGSNCTL 



16.2.7 LIST Directive 

Tto &m\m t*to v m tot k§ ****! mi, M m SSL a* 

found on the logical unit specified by the SMAIN directive 
IN (section 16.2.1). The LIST directive has the form 

LIST 

Example: List the old SGL. 

LIST 

Figure 16-2 shows the format of output from this directive. 
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Figure 16-2. SMAIN LIST Directive Listing 
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16.2.3 END Directive 

This directive indicates that all ADD (section 16.2.4), REP 
(section 16.2.5), and DEL (section 16.2.6) directives have 
been input. END initiates the SGL maintenance process. 
The directive has the general form 

END,L 

where L. if present, specifies that the old SGL is to be 
listed. 

ExampSes: After all ADD, REP, and DEL directives have 
been input, initiate SGL maintenance processing. 



END 



initiate the SGL maintenance processing as above, but list 
the old SGL. 

END,L 



16.3 SYSTEMMAINTENANCE OPERATION 



16.4 PROGRAMMING EXAMPLES 

Example 1: Schedule SMAIN, copy the old SGL from 
logical unit 4 onto logical unit 9 without listing the old SGL, 
and return to the JCP 

/SMAIN 
IN, a 
OUT, 9 
END 
/ENDJOB 

Example 2: Schedule SMAIN; copy the old SGL from 
logical unit 4 onto logical unit 9, listing the old SGL and 
defeting object modules A, B, C, D, and E; and return to 
the JCP. 

/SMAIN 

in, a 

OUT ,9 
DEL, A 

DEL,B,C,D,E 
END,L 
/ENDJOB 



The normal SMAIN operation consists of copying an 
existing SGL from the logical unit specified by the IN 
directive (section 16.2.1) to the logical unit specified by the 
OUT directive (section 16.2 2), making the modifications 
specified by the ADD (section 16.2.4), REP (section 16.2.5), 
and DEL (section 16.2.6) directives, and thus creating a 
new SGL. 



I nput of the END directive ( secti on 16.2.8) in itiaJasUfae / 
copying pro^at an Ann pfp ~^Th nci Ai^ZZL. iij^y, j 
must precede the END directive. "*""" * 



Modifications to the SGL are made through the logical unit 
specified by the ALT directive (section 16.2.3). Such 
modifications are in the form of additions and/or replace 
ments of object modules and /or control records. (These 
items can also be deleted, but this process does not, of 
course, require input on the ALT unit.) 



When an object module is input, SMAIN verifies that there 
is no error with respect to check-sum, record size, loader 
codes, sequence numbers, or structure. 



Example 3: Schedule SMAIN, list the contents the old SGL 
on logical unit 4, and return to the JCP. 

/SMAIN 
IN, 4 
LIST 
/ENDJOB 

Example 4: Schedule SMAIN; copy the old SGL from 
logical unit 4 onto logical unit 9 without listing the old SGL; 
add object modules or control records from logical unit 6 
after control record PART0002 and after object module A; 
replace load module LMGEN and control record JCPDEF; 
delete object modules B, C, D, and E; and return to the 
JCP. 

/SMAIN 

IN, 4 

OUT, 9 

ALT, 6 

ADD,PART0002,A 

REP, LMGEN 

DEL,B,C,D,E 

REP , JCPDEF 

END 

/ENDJOB 
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SECTION 17 

OPERATOR COMMUNICATION 



The operator communicates with the VORTEX system 
through the operator communication component by means 
of operator key-in requests input through the operator 
communication (OC) logical unit. 



where 



request is one of the key in requests listed above 
in capital letters 



17.1 DEFINITIONS 

An operator key-in request is a string of up to 80 
characters beginning with a semicolon. The request is 
initiated by the operator and is input through the OC unit. 
An operator key-in request is independent of I/O requests 
via the IOC (section 3) and, hence, is known as an 
unsolicited request. 

The operator communication (OC) logical unit is the logical 
unit through which the operator inputs key in requests. 
There is only one OC unit in the VORTEX system. Initially, 
the OC unit is the first Teletype, but this assignment can 
be changed by use of the ; ASSIGN key- in request (section 
1729). 



17.2 OPERATOR KEY-IN REQUESTS 

This section describes the operator key- in requests; 



SCHED Schedule foreground task 

TSCHED Time-schedule foreground task 

ATTACH^ Attach foreground task to PIM line 

RESUME Resume task 

TIME Enter or display time of day 

DATE Enter date 

ABORT Abort task 

TSTAT Test task status 

ASSIGN Assign logical unit(s) 

DEVDN Device down 

DEVUP Device up 

IOLIST List logical unit assignments 



Operator key-in requests comprise sequences of character 
strings having no embedded blanks. The character strings 
are separated by commas (,) or by equal signs (*). 
However, the key-in requests are free-form and blanks are 
permitted between the individual character strings of the 
key-in request, i.e., before or after commas (or equal signs). 
Although not required, a period (.) is a line terminator. 
Comments can be inserted after the period. A carriage 
return is required to terminate any key-in request, however, 
regardless of whether it contains a period. 

The general form of an operator key in request is 

;request,p(J ),p(2) ,p(n)cr 



each p(n) is a parameter defined under the 
descriptions of the individual key in 
requests below 

cr is the carriage return, which terminates 

all operator key- in requests 

Each operator key in request begins with a semicolon () 
and ends with a carriage return. Parameters are separated 
by commas. A backarrow ( -) deletes the preceding 
character A backslash (\) deletes the entire present key in 
request. 

Table 17-1 shows the system names of physical I/O devices 
as used in operator key-in requests. 

Peripherals for data communication are not used in 
OPCOM request, but are controlled with the Network 
Control Module (NCM) described in the VTAM Reference 
Manual. 

For greater clarity, optional blank separators between 
character strings, and the optional replacement of commas 
(,) by equal signs ( - ) are omitted from the descriptions of 
the key- in requests. 

Error messages applicable to operator key-in requests are 
given in Appendix A. 17. 

Table 17-1. Physical I/O Devices 



System Name 


Physical Device 


DUM 


Dummy 


CPcu 


Card punch 


CRcu 


Card reader 


CTcu 


Cathode ray tube (CRT) device 


Dcup 


Rotating-memory device (RMD) 
(disc/drum) 


LPcu 


Line printer or Statos-31'33 


MTcu 


Magnetic tape unit 


PTcu 


High-speed paper tape reader /f 


TYcu 


Teletype printer /keyboard 



CLmA, COmA Process I/O 
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Table 171. Physical I/O Devices (continued) 



System Name 

MXcu 
TCco 
SPco 



Physical Device 

Communication Multiplexor 
Psuedo TCM 
Spool Unit 
NOTES 



Operator key -in examples: Schedule on priority level 3 
the foreground task DOTASK residing on the FL logical 
unit. Use F as the protection key. 

; SCHED , DOTASK , 3 , FL , P 

Schedule on priority level 9 the resident foreground task 

COPYIO. 

; SCHED ,COPY 10, 9,0 



c = Controller number. For each type of device, 
controllers are numbered from as required. 

u = Unit number. For each controller, units are 
numbered from as required (within the 
capacity of the controller). 

cu can be omitted to specify unit controller 0, 
e.g., CROOor CR 

p « Partition letter. RMD partitions are lettered 
from A to T as required to refer to a partition on 
the specified device, e.g., DOOA. 

m =» Multiplexor number 

17.2.1 ;SCHED (Schedule Foreground Task) 
Key-In Request 

This key in request immedtately schedules the specified 
foreground library task for execution at the designated 
priority level. It has the general form 



;SCHED,task,leveUun,key 



where 
task 



level 



lun 



key 



is the name of the foreground task to be 
scheduled 



is the priority level (from 2 to 31) of 
the scheduled task 



is the number or name of the 
foreground-library rotating memory 
logical unit where the scheduled task 
resides (0 for scheduling a resident 
foreground task) 



is the protection code, if any, required to 
address lun 



17.2.2 ;TSCHED (Time-Schedule Foreground 
Task) Key-In Request 

This key-in request schedules the specified foreground- 
library task for execution at the designated time-of-day and 
priority level. It has the general form 



;TSCHED,task>vel,hin,key,time 



where 



task 



level 



lun 



key 



time 



is the name of the foreground task to be 
scheduled 



is the priority level (from 2 to 31) of the 
scheduled) task 



is the number or name of the 
foreground-library rotating memory 
logical unit where the scheduled task 
resides (0 for scheduling a resident 
foreground task) 



is the protection code, if any, required to 
address lun 



is the scheduled time in hours (from 00 
to 23) and minutes (from 00 to 59), e.g., 
1945 for 7:45 p.m. 



Operator key-in examples. Schedule for execution at 
11:30 p.m on priority level 3 the foreground task DOTASK 
residing on the US logical unit. Use T as the protection key 

;TSCHED, DOTASK, 3, US, T, 2 3 30 



A dump of the contents of a library can be obtained by use 
of the VORTEX file-maintenance component (section 9). 



Schedule for execution at 8:30 a.m. on priority level 9 the 
resident foreground task TESTIO 

r TSCHED , TESTIO ,9,0,0830 
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17.2.3 ;ATTACH Key-In Request 

This key-in request attaches the specified foreground task 
to the designated PIM (priority interrupt module) line. It 
has the general form 

;ATTACH ( U*Mne,iew,endWe 



Operator key-in example: Resume the task DOTASK 
; RESUME f DOTASK 

17.2.5 ;TIME Key-In Request 



where 



task 



line 



lew 



enable 



is the name of the foreground task to be 
attached to the PIM line 



is the two digit number of the PIM line to 
which the task is to be attached, with the 
tens digit specifying the PIM number (0 
7) and the units digit the line number (0 
7) on that PIM 



is the value (from 01 to 01/7777) of the 
interrupt event word (section 14 or 
appendix F) and identifies the bit(s) 

to be set in the task TIDB when an 

interrupt occurs on line 



is E (default value) to enable the tine, or 
D to disable it 



The task can be resident or nonresident However, its TIDB 
must have been defined at system generation time 
ATTACH provides a flexible way of altering interrupt 
assignments without having to regenerate the system. 

Operator key-in example: Connect task INTRPT 
to PIM 0, line 3. Use 020 as the interrupt event 
word value (i.e., set bit 4 of the interrupt event 
word in TIDB if INTRPT is scheduled due to an 
interrupt on PIM 0, line 3). 

; ATTACH, INTRPT , 3 , 2 



This key-in request enters the specified time, if any, as 
system time-of-day. If no time is specified in the key in 
request, ;TIME displays the current time-of-day. The key-in 
request has the general form 

;TIME,ttme 

where time is the time-of-day in hours (from 00 to 23) and 
minutes (from 00 to 59), e.g., 1945 for 745 p.m 

The time-of-day output for a ;TtME request without time is 
of the form 

T hhmra HRS 

where hhmm is the time of day in hours and minutes 

Operator key-in example: Set the system time of day to 
3:00 p.m. 

;TIME, 1500 



17.2.6 ;DATE Key-In Request 

This key in request enters the specified date as the system 
date It has the general form 



;DATE,mm/dd'yy 



where 



mm 



is the month (01 to 12) 



A PIM directive with the PIM line to be attached must have 
been specified during system generation to set up the link 
to the interrupt line handler region. 

Note: This directive detaches the PIM from a previous task 



dd 



yy 



istheday (01 to 31) 



is the year (00 to 99) 



17.2.4 ;RESUME Key-In Request 

This key in request reactivates the specified task for 
execution at its specified priority level It has the general 
form 

;RESUME,task 
where task is the name of the task to be resumed 



Note that since the entire date is considered one 
parameter, there are no commas other than the one 
immediately following DATE. The components of the date 
are, however, separated by slashes as shown VORTEX does 
not support date roll-over 



Operator key-in example: Set the system date to 25 
December 1971 



;DATE, 12/25/71 
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17.2.7 ;ABORT Key- In Request 

This key in request aborts the specified task. It has the 
general form 

;ABORTta$h 

where task is the name of the task to be aborted 
Operator key-in example: Abort the task DOTASK. 

; ABORT , DOTASK 

17.2.8 ;TSTAT (Task Status) Key-In Request 

This key in request outputs the status of the specified task, 
if any. If no task is specified, ;TSTAT outputs the status of 
all tasks queued on the active task identification block 
(TIDB) stack. This request is not applicable to tasks having 
no established TIDB. The request has the general form 

;TSTATfask 

where task is the name of the task whose status is to be 
output 

The status output for a JSTAT key in request is of the form 

task Pie vet Sstatus TMmm TSmitli 



1 


12 


-Exit from task 


1 


11 


TIDB resident 


I 


10 


Resident task 


1 


9 


Foreground task 


1 


8 


Protected task 


1 


7 


Task scheduled by time-delay 


1 


6 


Time delay active 


1 


5 


Task waiting to be loaded 
(check pointed) 


1 


4 


Task error 


1 


3 


Task interrupt expected 


1 


2 


Overlay task 


1 


1 


Scheduled task upon 
termination of active 
task 


I 





Task search-allocated-loaded 


2 


15 


Task opened, but not loaded 


2 


14 


Task loaded m background 
(checkpoint) area 


2 


13 


Load overlay 


2 


12 


Background checkpoint I/O wait 


2 


11 


Allocation override flag 


2 


10 


Background being checkpointed 


2 


9 


TIDB not available 


2 


8 


Unused 


2 


7 


Unused 


£. 


6 


Delay type 3 request 


2 


bO 


Task priority level 



where 



task 



level 



is the name of the task whose status is 
being output 



is the priority level (from to 31) of the 
task 



status is the status of the task as found in 

words 1 and 2 of the TIDB (table 17 2) 



Operator key-in examples: Request the output of the 
status of the task BIGJOB 

;TSTAT, BIGJOB 

The output will he 

BIGJOB PO^ S0001PO, 000000 TM0777"'? TSO77H30 



milli 



is the value of the counter in TIDB word 

11 



is the value of the counter in TIDB word 
10 



The values of min and milli are printed only if bit 6 and /or 
7 of TIDB word 1 (table 17 2) is set. 



Table 17-2. Task Status (TIDB Words 1 and 2) 



TIDB 
Word 



Bit 



Meaning of Set Bit 



1 15 

1 14 

1 13 



Suspend interrupt 
Suspend task 
Abort task 



if the status BIGJOB is such that it is on priority level 2, 
contains a status of 0100 in TIDB words 1 and 2, with time 
counters (TIDB words 1 and 10) of 077777 and 077430, 
respectively. The latter two octal complement counters 
show zero minutes and 0347 5-millisecond increments. 

Request the output of the status of all active tasks. 



;TSTAT 

and receive as a typical response 



VZDB 


P2U 


S047U01, 


000000 


V$TYA 


P23 


S017a 1 1 , 


000000 


VJTYA 


P23 


S0U7U11 , 


000000 


VZLPA 


P22 


S047K01 , 


000000 


VZCRA 


P22 


S0«7<I01 , 


000000 
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VZMTA 


P22 


soa7aoi , 


000000 


VZMTA 


P22 


so47aoi. 


000000 


V$OPCM 


P10 


S005U05, 


020000 


PfipGI 


P05 


S0U1501 , 


000000 


JCP 


P01 


soaa^oo , 


000000 



17.2.11 ;DEVUP (Device Up) Key-in 
Request 

This key in request declares the specified physical device 
operational for system use It has the general form 

;DEVUP,device 



17.2.9 .ASSIGN Key-In Request 

This key in request equates and assigns particular logical 
units to specific I/O devices. It has the general form 



;ASSIGN,K1) - r(l),/(2) « r(2). .J(n) = r(n) 



where 



eachKn) is a logical-unit number (e.g., 12) or 

name(e.g.SI) 



eachr(n) is a logical-unit number or name, or a 

physical-device system name (eg., TYOO 
or TY, table 17 1) 

The logical unit to the left of the equal sign tn each pair is 
assigned to the unit/device to the right 

An inoperable device, i.e., one declared down by ;DEVDN 
(section 17.2.10), cannot be assigned. A logical unit 
designated as unassignable (unit numbers 101 through 
179) cannot be reassigned. 

Operator key-in examples: Assign the card reader CROO 
as the SI logical unit and the Teletype TY01 as the OC unit. 

; ASSIGN, SI -CROO , OOTYO 1 

Assign a dummy device as the PI unit 

;ASSIGN,PI-DUH 



17.2.10 ;DEVDN (Device Down) Key-In 
Request 

This key-in request declares the specified physical device 
inoperable tor system use It is not applicable to the OC 
unit or to devices containing system libraries. The request 
has the general form 

;DEVDN,device 

where device is the system name of the physical device in 
four ASCII characters, e.g.. LP00<or IP), TY01. (table 17 1) 



Operator key-in example; 
system use. 

;DEVDN,TY01 



Declare TY01 inoperable for 



where device is the system name of the physical device in 
four ASCII characters, e.g., LP00 (or LP). TY01 (table 17 1) 

Operator key-in example: Declare TY02 operational for 
system use 

;DEVUP,TY02 

17.2.12 ;IOLIST (List I/O) Key-In 
Request 

This key in request outputs a listing of the specified logical 
unit assignments, if any If no logical unit is specified, 
;IOLIST outputs all logical-unit assignments with names 
The key in request has the general form 

',\OU$T,lun(l),iun(2),..Jun(n) 

where each lun(n) is the name or number of a logical unit. 
eg, SL5. 

Where the ;IOLlST key in request specifies a logical unit 
name, the output is of the form 



name (number) = device D 



where 



name 



number 



device 



is the name of the logical unit, e.g. . LO 



is the number of that logical unit, eg., 
005 

is the name of the physical device 
assigned, e.g., LP00 



if present, indicates that the physical 
device has been declared down and is 
thus inoperable 



If the key in request specifies the number rather than the 
name of the logical unit, the output will repeat the number 
in both the name and number fields 



In a listing ot all assignments, the output uses a name and 
number where applicable Logical units without names 
assigned at system-generation time are not listed and must 
be individually specified by number 



17-5 



OPERATOR COMMUNICATION 



Operator key in examples: Request the output of the 
logical unit assignments tor the Bl and BO units Input 

;IOLIST,BI,BO 

and receive as a typical response 

BI (006) - CR00 
BO (007) - CPOO D 

Request the output of the logical unit assignment for logical 
unit 180. Input 

; IOLIST, 180 
and receive as a typical response 
180 ( 180) « D1 1H 
Request the output of all logical unit assignments. Input 



; IOLIST 



and receive as a typical response 



OC 


(001 ) 


- TY00 


SI 


(002) 


- TY00 


SO 


(003) 


- TY00 


PI 


(ooa) 


- CROO D 


LO 


(005) 


- LPOO 


BI 


(006) 


- CROO D 


BO 


(007) 


- PTOO 


SS 


(008) 


- DOOH 


PO 


(009) ■ 


■ DOOH 


CU 


( 100) « 


- DOOE 


GO 


(101) . 


• DOOG 


sw 


(102) - 


- DOOF 


CL 


( 103) - 


» DOOA 


OM 


( 10a) ■ 


• DOOD 


BL 


( 105) ■ 


■ DOOC 


FL 


(106) - 


• DOOB 
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OPERATION OF THE VORTEX SYSTEM 



This section explains the operation of devices in the 
VORTEX system, the loading of the system bootstrap 
loading and initializing of writable control store and 
procedures for changing and initializing the disc pack 
during VORTEX operation. 

18.1 DEVICE INITIALIZATION 

18.1.1 Card Reader 

(Modal 70-6200) 

a. Turn on the card reader. 

b. Pface the input deck in the card hopper 

c. Press READY/ALERT. 

18.1.2 Card Punch 

(Model 70 6200) 

a. Turn on the card punch. 

b. Place blank cards in the card hopper. 

c. If the visual punch station is empty, insert a card into it 
as follows: 

( 1 ) Place a card in the auxiliary feed slot. 

(2) Clear all registers. 

(3) Set the instruction register I to 0100131. 

(4) Set REPEAT. 

(5) Press STEP. The card should move from the 
auxiliary feed slot to the visual punch station. 

(6) Reset REPEAT. 

18.1.3 Line Printer 

(Model 70-6701) 

a. Turn on the line printer. 

b Watt for the READY light to come on. 

c. Set the ON LINE/OFF LINE switch to ON LINE. 

d. For manual paper ejection set to OFF LINE, then press 
the TOP Of FORM switch. 

18.1.4 StatOS-31 (Mode/ 70-660? and -6603) 

a. Turn on plotter/printer 

b. Set the ON LINE/OFF LINE switch to ON LINE 

c. Select roll or z-fold paper switch for paper type used 

d. For manual form feed press FORM FEED 



18.1.5 33/35 ASR Teletype 

(Models 70-6200 and 6201 

a. Turn on the Teletype. 

b. Set the Teletype in off-line mode and simultaneously 
press the CONTROL and D r then the CONTROL and T, 
finally the CONTROL and Q keys. 

c. Set the Teletype on-line. 

18.1.6 High-Speed Paper-Tape Reader 

(Model 70-6320) 

a. Turn on the paper-tape reader. 

b. Position the input paper tape in the reader with blank 
leader at the reading station and close the reading 
gate. 

c Set the LOAD/RUN switch to RUN. 

18.1.7 Magnetic-Tape Unit 

(Models 70-7100,7102, and 620-31 

a. Turn on the magnetic tape unit. 

b. Mount the input magnetic tape. 

c. Position the magnetic tape to the loading point. 

d. Press ON LINE. 

18.1.8 Magnetic-Drum and Fixed-Head 
Disc Units 

(Models 620-47 through 620-49, 
70-7702 and 70 7703 

a. Turn on the drum untt. 

b. Wait for the drum unit to reach operating speed 



18.1.9 Moving-Head Disc Units 

(Models 70 7600 and 70-7610 

a. Place the START/STOP switch in the STOP position. 

b. Press POWER ON button and wait for the SAFE light to 
come on. 

c. Mount the disc pack. 

d . Place the START / STOP switch in the START position . 

e. Wait for the disc unit to reach operating speed (READY 
indicator lights). 
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f. Turn off WRITE PROTECT. 



Table 18-1. Key-In Loader Programs (continued) 



18.1.10 Moving-Bead Disc Units 

(Modef 70-7500) 

a. Mount the disc pack 

b. Press POWER-ON button and wait for unit to reach 
operating speed and for the heads to emerge 

c. Press on-hne button. 



13.1.11 Moving-Hftad Disc Units 

(Model 70-7510) 

a. Mount the disc pack(s). 

b. Turn power on and wait for the umt(s) to reach 
operating speed (unit- ready light comes on). 



18.1.12 Moving-Head Disc Units 

(Models 70-7603, 70-7613) 
a. Mount disc pacK. 
b Press START button and wait for Ready light. 

18.2 SYSTEM BOOTSTRAP LOADER 

System key-in loaders initiate loading of the VORTEX 
system from a drum or disc memory. The key-in loader loads 
the system in'tiaiuer from the RMD to main memory 
(locations 000000 to 001127). The system initializer then 
loads and initializes the system. Table 18-1 contains the 
key- in loader programs. 





Table 18-1. 


Key-In Loader 


Programs 




Address 


Drum 


Disc 


Disc 


Disc 




-4^,49 


70-7510 


70-7500 


70-7600, 
7610, 
•7603 or 
7613 


001130 


lOOOyy 


005302 


005302 


1004zz 


001131 


006020 


006030 


006030 


1040zz 


001132 


000002 


000005 


177773 


1002zz 


001133 


005001 


005001 


005001 


005001 


001134 


1031xx 


lOOOzz 


lOOOzz 


1031zz 


001135 


006120 


1031zz 


1031ZZ 


lOlOzz 


001136 


001127 


1005ZZ 


lOOSzz 


001141 


001137 


1031yy 


1010ZZ 


lOlOzz 


001000 


001140 


lOOOxx 


001143 


001143 


001135 


001141 


lOOOzz 


001000 


001000 


1025zz 



Address 


Drum 


Disc 


Disc 


Disc 




■48,49 


70-7510 


70-7500 


707600, 
-7610, 
7603 or 
7613 


001142 


1032zz 


001137 


001137 


151167 


001143 


lOlOxx 


1025zz 


1025zz 


001016 


001144 


000600 


001016 


001016 


001130 


001145 


001000 


001200 


001130 


lOObyyi 


001146 


001143 


005123 


005122 


1003ZZ 


001147 




006120 


005021 


005102 


001150 




000167 


006120 


1032zz 


001151 




004460 


000167 


1031xx 


001152 




lOOOzz 


004460 


006010 


001153 




lOOOyy 


lOOOzz 


001130 


001154 




1031xx 


lOOOyy 


1031yy i 


001155 




1032yy 


1031xx 


lOOOxx <5 


001156 




lOOOxx 


1032yy 


lOOOzz 2 


001157 




005041 


lOOOxx 


f^lOUzz S 


001160 




1031zz 


005041 


i -001 157 


001161 




1004zz 


006150 


1025zz < 


001162 




1014zz 


000007 


151167 


001163 




001166 


1031zz 


001016 


001164 




001000 


10O4zz 


001130 


001165 




001162 


1014zz 


ooioe* 


001166 




1025Z2 


001171 


oooeoo<r 


001167 




001016 


001000 


007760 


001170 




000120 


001165 




001171 




005145 


1025ZZ 




001172 




006140 


001016 




001173 




000012 


001130 




001174 




001002 


005144 




001175 




000600 


001040 




001176 




001000 


000600 




001177 




001146 


001000 




001200 




000000 


001146 





where xx - even BIC address, yy - odd BIC address, and 
zz = device address. 



18.2.1 Automatic Bootstrap Loader 



Where the automatic bootstrap loader option is available, 

the appropriate key-in loader is loaded from the required 

I a/ i7 f v medium (high-speed paper-tape or Teletype reader) into 

W evocations starting with 001130. If the system contains a 

^ ■■& V70 RMD ABL the boot program is automatically loaded 

: /r<4*T© initiate the loader: (1) clear the A, B r X, I, and P 

registers; (2) with the computer in STEP, press the RESET 

switch on the front panel; (3) place the STEP/RUN switch 

in the RUN position; and (4) press and release the LOAD 

* switch. 



<. 
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18.2.2 Control Panel Loading 

The appropriate key in loader is entered through the 
computer control panel. Refer to the hardware handbook 
for details. 

To initiate the bootstrap, clear the A, B, X, and I registers, 
and toad 001130 into the P register. Then, press RESET, 
place the STEP/RUN switch in the RUN position, and press 
START. See section 15.8 and 20.1.4 for details as system 
initialization messages. 

NOTE: To facilitate reloading, the key-in loader may be 
dumped out on paper tape and then loaded by the binary 
loader (BLD II). 



18.3 DISC PACK HANDLING 

VORTEX provides for dynamic mounting of disc packs 
during program execution by means of a system utility 
program called rotating memory analysis and initialization 
(RAZI). RAZI handles: 

a. A disc pack not previously used with VORTEX that is 
replacing a disc pack presently in the system. 

b. A disc pack previously formatted under VORTEX that is 
replacing a disc pack presently in the system. 

The normal RAZI operating procedure is: 

a The task requiring the disc pack change issues an 
operator message directing him to switch packs. 

b. The task suspends itself. 

c The operator makes the necessary pack changes. 

d. The operator schedules and executes RAZI. 

e. Upon completion of RAZI, the operator resumes the 
suspended task. The task can now perform I/O on the 
new pack. 

RAZI is a foreground program residing in the foreground 
library (FL). It is scheduled by a request of the form: 

;SCHED,RAZI,p,FL,F 

where p is the priority level. 



If the S! logical unit is a Teletype or a CRT device, the 
message RZ** is output to indicate that the SI unit is 
waiting for RAZI input 

Each directive is completely processed before the next is 
entered. AN directives are output on the SO device. In 
addition, partitioning information is listed on the LO device 
when integration of the requested disc pack is complete. 



OUTPUTS from the RAZI comprise: 

a. Error messages 

b. The listing of the RAZI directives on the SO unit 

c. Partition description listing 



Error messages applicable to RAZI are output on the SO 
and LO logical units. The individual messages and errors 
are given in Appendix A. 18. 

The partition description listing is output on the LO device 
upon completing the integration of a new disc pack into the 
VORTEX system. After the VORTEX standard heading, 
there are three blank lines followed by the RAZI heading: 



PARTITION 
NAME 



FIRST 
TRACK 



LAST 
TRACK 



BAD 
TRACKS 



followed by one more blank line. Then the information 
concerning each partition of the device is output, one 
partition per line, as shown in the following example. 



PARTITION 


FIRST 


LAST 


BAD 


NAME 


TRACK 


TRACK 


TRACKS 


D10A 


0002 


0019 


0000 


D10B 


0020 


0052 


0001 


D10C 


0053 


0082 


0000 


D10D 


0083 


01 18 


0000 


D10E 


01 19 


0126 


0000 


D10F 


0127 


0141 


0000 


D10G 


0142 


0156 


0000 


D10H 


0157 


0206 


0002 


D10I 


0207 


0242 


0000 


D10J 


0243 


0251 


0000 


D10K 


0252 


0256 


0000 



The RAZI directives are: 



PRT 



FRM 

INL 

EXIT 



Partition 

Format rotating memory 

Initialize 

Exit 



RAZI directives begin in column ! and comprise sequences 
of character strings having no embedded blanks. The 
character strings are separated by commas (,) or equal 
signs (-). The directives are free-form, and blanks are 
permitted between the individual character strings of the 
directive, i.e., before or after commas (or equal signs). 

The general format of a RAZI directive is 

natm,p(l),p(2) p(n) 
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where 



name 



each p(n) 



js one of the directive names given 
above 

is a parameter required by the directive 
and defined below under descriptions of 
the individual directives 



Numerical data can be octal or decimal. Each octal number 
has a leading zero. 

For greater darity in the descriptions of the directives, 
optional periods, optional blank separators between 
character strings, and the optional replacement of commas 
(,) by equal signs { - ) are omitted. 

Note: The disc pack containing the VORTEX nucleus 
cannot be replaced. 

18.3.1 PRT (Partition) Directive 



previously constructed bad track table from the RMD and 
builds a new PST for it.* The directive has the general form 



FRM, ki, size, flag 



where 



lu is the iogicaJ-unit name or number to 

which the subject RMD is assigned. This 
must be the assigned to the first 
partition. 

size is the number (octal or decimal) of 

tracks on the RMD 

flag is 1 to perform a complete bad-track 

analysis, or to accept a bad-track table 
from the RMD 

*FRM clears alt PSTs and directories. It should not be used 
when a unit contains a good BIT and files as these will be 
destroyed- 



This directive specifies the size and protection code for 
each RMD partition, it has the general form 



PHJ, pa)MDM(np(2)M2) t k(2) P(n),$(n),k(n) 



where 



each p(n) 



s(n) 



k(n) 



ss the RMD partition letter (A through T, 
inclusive) 

is the number (octal or decimal) of 
tracks in the partition. This value must 
be greater than zero 

is the protection code, if any, required to 
address p, or * if the partition is 
unprotected 



While the partition specifications can appear in any order, 
the set of partitions specified for each RMD must comprise 
a contiguous group, e.g., the sequence A, C t D, B is valid 
but, the sequence A, C, D, E constitutes an error. 

Consecutive PRT directives redefine partitions, if p(n) has 
been specified, or adds partitions if p(n) is new partition 
letter. 

Example: Define three partitions on an RMD. The first 
occupies ten tracks and uses protection code Q, the second 
two tracks and code S, and the third 48 tracks without 
protection. 

PRT, A, 10,Q,B,2,S,C,060,* 



18. 3.2 FRM (Format Rotating Memory) 
Directive 



Caution: When performing a bad track analysis or accept 
ing a bad-track table from an RMD the bad-track table is 
positioned adjacent to the resident foreground task area. 
Unless there already exists an active bad-track table for the 
prior RMD, the bad track table for the new RMD will be 
overlayed, if the resident foreground area is increased by 
means of a partial SYSGEN. Thus if a partial SYSGEN is 
performed which increases the resident foreground size, 
another RAZI must be performed. 



Examples: Clear the RMD assigned to P0, having 203 
tracks, and build a PST for it according to previously 
defined partition information. 

FRM, PO, 203,0 

Run a complete bad-track analysis on the RMD assigned to 
25, having 128 tracks, and build a PST for it according to 
previously defined partition information. 

FRM, 25, 128, 1 

620-35 and 620 34 discs in a system require the formatting 
program (describe in section 18.4) to format disc and 
analyze bad tracks 



18.3.3 INL (Initialize) Directive 

This directive causes RAZI to incorporate a PST and a bad 
track table from the named RMD into the VORTEX nucleus. 
It has the general form 

lNL.lu.s4ze 



This directive causes RAZI to run a bad track analysis on 
the specified RMD and build a new PST for it or accepts a 



where hi and size have the same definition as in the FRM 
directive (section 18.3 .2). 
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Example: Read the PST and bad track table from the unit 
assigned to BO, having 128 tracks, and incorporate them 
into the VORTEX nucleus. 

INL, BO, 128 



18.3.4 EXIT Directive 

This directive terminates RAZI. It has the general form 

EXIT 
Example: Terminate RAZI 
EXIT 



18.4 70-7500 (620-35) DISC PACK 
FORMATTING PROGRAM 

Each 707500 (620-35) disc pack requiries formatting 
before any input or output operation can be performed on 
it. Before VORTEX can be prepared on a 707500 disc pack 
or any 707500 discs can be used under VORTEX, disc 
packs must be formatted. The formatting program forms 
120-word sectors, which are grouped 24 per track. The 
program also examines the disc pack for bad tracks. 

The formatting program operates in a stand-alone mode. It 
may be loaded. and executed with either AID or BLD. 
Execution begins at location 01354. Upon execution the 
formatting program requests some parameters to be input 
from the keyboard. The following requests are made. An 
inappropriate response causes the request to be repeated. 

Request 
INPUT BTC NUMBER 

Type a value and a carriage return. The 
acceptable values are octal 020, 022, 024, 026 
and 070 



INPUT DEVICE ADDRESS 

Type a value in the range from octal 014 
through 017 followed by a carriage return 

INPUT VARIABLE SECTOR GAP 

Type a value and carriage return. Acceptable 
values are 1, 2, 3, 4, 6, 8, 12, or their equivalent 
octal representations. This value determines the 
physical location on the disc pack of sequentially 
addressable sectors, as such sequential trans 
fers may be accomplished without waiting for a 
full revolution of the disc unit Recommended 
setting is 3. Another setting may be more 
effective depending upon vwious application 
parameters such as number tof tasks, frequency 
of disc transfers, and types of disc transfers. 



INPUT UNIT NUMBER 

Type unit number followed by a carriage return. 
Acceptable values are through 3. Up to four 
units can be connected to a single controller. 

In addition the formatting program performs bad-track 
analysis and creates and maintains a bad-track table, 
which is entered on each disc pack at the completion of its 
formatting. The bad-track table is located on sectors 
through 2 of the first track. The table is 254 words long, 
starting at word 64 of sector 0. The first 64 words of sector 
reserve the necessary space for the PST. The remaining 
unused words of sector 2 are filled with zeroes. Each disc 
I/O error will generate a ten-event retry sequence, which 
upon failure will set the bad-track flag within the track 
header. The program also sets the corresponding bit in the 
bad-track table. No alternate tracks are assigned. 

If the first track is determined to be bad, the bad track 
table may not be placed there. The program prints the 
error message, 

FIRST TRACK BAD 



and aborts formatting the current disc pack. The program 
returns to the keyboard interrogation routine. A'ter the 
bad-track table has been written on the disc pack, the 
formatting program resumes the keyboard interrogation to 
obtain parameters for formatting the next disc. In this way, 
more than one disc pack can be formatted in the same 
session. The formatting program may be terminated at this 
point when no disc packs (except those with bad first 
tracks) remain unformatted. If an unsafe condition 
(SELECT LOCK light on) occurs, reload and execute the 
program. Formatting disc packs is not necessary before 
every VORTEX system generation. Head crashes generally 
indicate formatting should be done again. 



18.5 70-7510 (620-34) DISC PACK 
FORMATTING PROGRAM 

Each 620-34 disc pack requires formatting before any input 
or output operation can be performed on it. Before VORTEX 
can be prepared on a 620-34 disc pack or these disc can be 
used under VORTEX, the packs must be formatted. The 
formatting program forms 120*word sectors, which are 
grouped 24 per track. The program also examines the disc 
pack for bad tracks. 

The formatting program operates without an operating 
system It may be loaded and executed either with AID II or 
BLD It Its execution begins at location 01354. Upon 
execution the formatting program requests some parame 
ters to be input from the keyboard. An inappropriate 
response causes the request to be repeated. The following 
requests are made. 

INPUT BTC NUMBER 
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Type a value and a carriage return. The 
acceptable values are octal 020, 022. 024, 026 
and 070. 



program. Formatting disc packs is not necessary before 
every VORTEX system generation. Head crashes generally 
indicate formatting should be done again. 



INPUT DEVICE ADDRESS 

Type a value in the range from octal 014 
through 017 followed by a carriage return. 

INPUT VARIABLE SECTOR GAP 

Type a vaiue and a carriage return. Acceptable 
values are 1, 2, 3, 4, 6, 8, 12, or their equivalent 
octal representations. This value determines the 
physical location on the disc pack of sequentially 
addressable sectors, as such sequential trans- 
fers may be accomplished without waiting for a 
full revolution of the disc unit. Recommended 
setting is 3. Another setting may be more 
effective depending upon various application 
parameters such as number of tasks, frequency 
of disc transfers, and types of disc transfers. 

INPUT UNIT NUMBER 

Type unit number followed by a carriage return. 
Acceptable vaiues are through 3. Up to four 
units can be connected to a single controller. 

In addition the formatting program performs bad-track 
analysis and creates and maintains a bad track table, 
which is entered on each disc pack at the completion of its 
formatting. The bad track table is located on sectors 
through 4 of the first track. The table is 508 words long, 
starting at word 64 of sector 0. The first 64 words of sector 
reserve the necessary space for the PST. The remaining 
unused words of sector 4 are filled with zeros. Each disc 
I/O error will generate a ten -event retry sequence, which 
upon failure will set the bad-track flag within the track 
header. The program also sets the corresponding bit in the 
bad-track table. No alternate tracks are assigned. 

If the first track is determined to be bad, the bad-track 
table may not be placed there. The program prints the 
error message: 

FIRST TRACK BAD 

and aborts formatting the current disc pack. The program 
returns to the keyboard interrogation routine. After the 
bad-track table has been written on the disc pack, the 
formatting program resumes the keyboard interrogation to 
obtain parameters for formatting the next disc. In this way, 
more than one disc pack can be formatted in the same 
session. The formatting program may be terminated at this 
point when no disc packs (except those with bad first 
tracks) remain unformatted. If an unsafe condition 
(SELECT LOCK light on) occurs, reload and execute the 



18.6 70-7603/7613 DISC PACK 
FORMATTING PROGRAM 

Each 70-7613/7613 disc pack requires formatting before 
any input or output operation can be performed on it The 
formatter forms 120 word sectors which are grouped 48 per 
track. The program also performs a bad-track analysis. 

The formatter (format F p/n 92A0205-030) operates under 
the MAINTAIN III executive. For instructions on loading 
from magnetic tape, cards or paper tape, see the MAIN- 
TAIN III Manual (98A9952-070). Execution begins at 
location 500. Some parameters are requested from the 
keyboard. Inappropriate responses cause the request to be 
repeated. All inputs are terminated by periods. 

INPUT BIC NUMBER 
Enter an even value in the range octal 020 through 076. 

INPUT DEVICE ADDRESS 
Enter a value in the range octal 014 through 017. 

INPUT UNIT 

Enter a value in the range through 7. This must be the 
physical unit number calculated as follows: 



UUP, 



(2) 



where 



UU 
P 



is unit number 3 
is platter fixed 

platter 1 removable 

(Note: System RMD is always 

000 regardless of which 

platter. 



INPUT KNOWN BAD TRACKS 

Enter octal track numbers in the range through 0625 
separated by commas and terminated by a period. If there 
are no known bad tracks, input only a period. 

In addition, the formatting program performs bad track 
analysis and creates and maintains a bad-track table, 
which is entered on each disc pack at the completion of its 
formatting. The bad-track table is located on sector of 
the first track. The table is 26 words long, starting at word 
64 of sector 0. The first 64 words of sector reserve the 
necessary space for the PST. The remaining unused words 
of sector are filled with zeros. Each disc I/O error will 
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generate a five event retry sequence which, upon failure, 
will set the corresponding bit in the bad track table. No 
alternate tracks are assigned. 

If the first track is determined to be bad, the bad track 
table may not be placed there. The program prints the 
error message, 



18.7 WRITABLE CONTROL STORE (WCS) 

The writable control store must be loaded with the 
appropriate firmware. The WCS is loaded by the V73 WCS 
Microprogram Utility (MIUTIL). MIUTIL is a foreground 
program scheduled by a request: 



FIRST TRACK BAD 

and aborts formatting the current disc pack. The program 
returns to the keyboard interrogation routine. After the 
bad-track table has been written on the disc pack, the 
formatting program resumes the keyboard interrogation to 
obtain parameters for formatting the next disc. In this way, 
more than one disc pack can be formatted in the same 
session. The for- matting program may be terminated at 
this point when no disc packs (except those with bad first 
tracks) remain unformatted Formatting disc packs is not 
necessary before every VORTEX system generation. Head 
crashes generally indicate formatting should be done 
again 



;SCHED,MIUTIL ( p,FL,r 

where p is the priority level. Use of the MIUTIL program is 
described in detail in the Microprogramming Guide. 

If the optional V70 series Floating Point Firmware is to be 
used, it must be loaded into page 1 of WCS. The WCS 
microprogram is catalogued into the QM library under the 
name WCSFP, and must be transferred to the 81 device for 
loading by MIUTIL. The WCS should be initialized through 
the use of MIUTIL prior to loading the floating-point 
microprograms 

Section 20 gives additional information about writable 
control store. 
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WRITABLE CONTROL STORE AND 
FLOATING-POINT PROCESSOR 



The Writable Control Store (WCS) option extends the 
Varian 70 series processor's readonly control store to 
permit the addition of new instructions, development of 
microdiagnostics, and optimal tailoring of the computer 
system to its application. Unlike the read-only control store, 
which contains the Varian 70 series standard instruction 
set and cannot be altered, the WCS can be loaded from 
main memory under control of certain I/O instructions. The 
capabilities of WCS give the user more complete access to 
the resources of the Varian 70 series computer system. 



20.1 MICROPROGRAMMING SOFTWARE 

Supporting software for the WCS includes the following: 

• Microprogram assembler MIDAS 

• Microprogram simulator MICSIM microprogram 
Microprogram utility loader and diagnostic MIUTIL 

• WCS reload task 

All software for microprogram development operates under 
VORTEX The capabilities and use of WCS and its 
supporting software are described in the Varian Micropro 
gramming Guide 

20.1.1 Microprogram Assembler 

The Varian microprogram simulator (MICSIM) helps the 
programmer to verify and optimize microprograms. MICSIM 
runs the output from MIDAS within the system's main 
memory. At selected times, conditions and the contents of 
data locations can be examined and changed. MICSIM is 
scheduled from the background library at level by 

Under VORTEX, MIDAS is scheduled from the background 
library at level by 



/LOAD, MIDAS 



20.1.2 Microprogram Simulator 

The Varian microprogram simulator (MICSIM) helps the 
programmer to verify and optimize microprograms MICSIM 
runs the output from MIDAS within the system's main 
memory At selected times, conditions and the contents of 
data locations can be examined and changed. MICSIM is 
scheduled from the background library at level by 

/LOAD, MICSIM 



20.1.3 Microprogram Utility 



Loading the control store with the assembled and tested 
microcode is performed by microprogram utility, MIUTIL 



In addition, on-line debugging directives are available 
through the utility on a special configuration. The MIUTIL 
program operates as a foreground program at priority level 
set by the user. The program is scheduled by operator 
input over the OC device For example, 

;SCHED, MIUTIL, 3 , FL , F 



The microprogram utility is also responsible for maintain 
ing an up-to-date image of the contents of the WCS on an 
RMD file, named WCSIMG on the OM library, see section 
15.8. This image is then used by the WCS reload task, 
WCSRLD, to restore the WCS following a power failure/ 
restart and VORTEX reload. The RMD file image is updated 
each time the R directive is used to exit from the utility. 



If the update is completed successfully, the message 
WCS SAVED 



is output on the OC and LO devices before the utility exits 
If the RMD file for saving the WCS is not present on the 
OM library the OM library, the system outputs 

IO10, MIUTIL 

FILE WCSIMG NOT FOUND 

WCS SAVE ABORTED 



I/O errors which may occur during the save operation 
result in outputting messages 

IOxx, MIUTIL 

WCS SAVE ABORTED 



If the restoration of WCS is completed successfully, the 
message WCS RELOADED will be output to the OC and LO 
devices before the reload task exits. 

To exit from the microprogram utility without updating the 
RMD file, the operator may issue the directive. 

; ABORT, MIUTIL 
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20.1.4 WCS Reload Task, WCSRLD 

This task, WCSRLD, reinitializes the WCS to the contents 
specified by the RMD file image of WCS, WCSIMG on the 
OM library. It is automatically scheduled on power failure/ 
restart or upon the reloading of the VORTEX system. In this 
way, WCS contents are preserved through any periods 
without power. 

Though usually scheduled automatically by the system, the 
reload task may also be scheduled manually by the 
operator. For example, the following directive schedules the 
reload task at priority level 15: 

; SCHED , WCSRLD , 1 5 , FL , F 



20.2 STANDARD FIRMWARE 

Standard firmware is available on the 70 series computers 
to provide faster and more compact code The executable 
code which uses the firmware, or microprograms, is 
automatically generated by the VORTEX FORTRAN IV 
compiler when the option F is specified (in the JCP 
directive /FORT, see section 4 2.15), The firmware also 
extends the capabilities of the user's assembly language 
programs and the support library (see section 13). 

Standard firmware includes routines which are loaded into 
the system's WCS for the following categories of operations: 



Arithmetic for two-word fixed point and integer 
numbers 

Arithmetic for real (floating point) numbers 

Transfer of two word values, such as a memory to 
memory move 

FORTRAN oriented routines 

Byte manipulation 

Slack manipulation 



Fxecuting a branch to control store (BCS) instruction 
causes a transfer of control from the system's read-only 
memory to the WCS at the address specified in the BCS 
instruction. The MIUTIL program (see section 20.1.3) loads 
the standard firmware as well as any extensions to the 
instruction set the user may write. To execute firmware, the 
program must use a BCS instruction with the appropriate 
entry address and calling sequence for passing parameters. 

A FORTRAN IV program specifies the option F on its 
request for compilation, and then BCS instructions are 
generated The FORTRAN IV programs use this firmware 
without any changes to the FORTRAN IV statements. 



Due to size constraints, some firmware is unavailable 
under certain hardware configurations. Table 20 1 shows 
these restrictions 



Table 201. Firmware Availability 

Hardware Configurations 
without FPP with FPP 



Firmware Routine 



XAD,XSB 


YES 


YES 


XMU.XDV 


YES 


NO 


IMU.IDV 


NO 


YES 


FAD.FSB.FMU.FDV 


YES 


NO 


FSQ 


NO 


YES 


FLD,FST T FMV 


YES 


YES 


FSE,FDO,FD01 


YES 


YES 


FTNE.FTEQ, ,FTGT 


NO 


YES 


FJNE,FJEQ,...,FJGT 


NO 


YES 


FAIF.FIOP 


NO 


YES 


FRSC.FRSR.FJAG 


NO 


YES 


Byte Firmware 


YES 


YES 


Stack Firmware 


YES 


YES 



20.2.1 Fixed-Point Arithmetic 
Firmware 

Two-word fixed point and integer numbers use the following 
arithmetic firmware: 



Mnemonic Function 

XAD Fixed-point and integer add 

XSB Fixed point and integer sub 

tract 

XMU Fixed-point multiply 

XDV Fixed-point divide 

IMU Integer multiply 

IDV Integer divide 



BCS Call 

0105334 
0105374 

0105274 
0105234 
0105027 
0105067 



These operations are performed on the hardware A and B 
registers (AB), using the number specified by the second 
word of the respective BCS call. If overflow occurs, AB is set 
to the maximum number with the proper sign and the 
overflow flag (OVFL) is set. 

For two-word fixed-point numbers, the decimal point is 
assumed to be to the left of bit 15 of the most significant 
word. For two word integer numbers, the decimal point is 
assumed to be to the right of bit of the least significant 
word. As a result, rounding and overflow conditions are 
different for multiply and divide. For example, multiplying 
two double-word numbers produces a logical four-word 
result. The fixed-point function returns the high order two 
words and drops the lower two. The integer multiply returns 
the lower two-words of the logical result and sets overflow if 
either of the two higher words are nonzero. 
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20.2.2 Floating-Point Arithmetic 
Firmware 

The addition, subtraction, multiplication, and division of 
single precision real, or floating-point, numbers can be 
performed wtth the following firmware. 

Mnemonic Function BCS Cat) 

FAD Floating-point add 0105134 

FSB Floating-point subtract 0105174 

FMU Floatingpoint multiply 0105074 

FDV Floating point divide 0105034 

FSQ Floatingpoint square root 0105127 

A floating-point arithmetic operation is performed on AB 
using the floating-point number specified by the second 
word of the BCS call. If underflow occurs, AB is set to zero. 
If overflow occurs, AB is set to the maximum floating-point 
number with a proper sign. Taking square root of a 
negative number results in the overflow being set and AB 
set to zero. 



Mnemonic Use BCS Call 

FJLT Jump if less than 0105126 

FJGE Jump if greater than 0105166 

or equal 
FJLE Jump if less than or 0105326 

equal 
FJGT Jump if greater than 0105366 

FAIF Arithmetic IF processor 0105226 

FIOP Indexed operand proces 0105167 

sor 
FRSC Reentrant subroutine 0105025 

call 
FRSR Reentrant subroutine 0105065 

return 
FJAG Jump if A register 0105125 

greater 

FSE Pass parameters between 0105036 

subroutines 
FDO Terminate DO loop 0105035 

FOOl Terminate DO loop 0105027 

(1 increment) 



20.2.3 Data Transfer Firmware 



For FSE, the calling routine would use the following 
sequence: 



The data transfer firmware routines load AB from memory, 
store AB m memory, and move the contents of two 
contiguous memory locations to another place in memory. 



Mnemonic Function 



HD 



FST 
!~MV 



Load AB with two words 
from memory 
Store AB into memory 
Memory to memory move 

of two words 



BCS Call 

0105032 

0105033 
0105037 



20.2.4 FORTRAN-Oriented Firmware 

These microprograms are oriented toward FORTRAN IV 
operations. However, they have a similar utility to assem 
bly language programs. 



Mnemonic 



Use 



BCS Call 



CALL 


SUB 




DATA 


P1 


Address of first 


• 




data to be moved 



DATA 



Pn 



Address of last 
data to be moved 



In the subroutine being called, the following sequence is 
necessary to receive the data or data address: 



SUB 



BSS 
DATA 
DATA 
BSS 



1050 36 BCS transfer for FSE 
n Number of parameters 

m Number of parameters 



The second instruction, FDO to control a DO loop, uses the 
following catling sequence: 



DATA 
DATA 



105035 BCS transfer to FDO 



PI 



Address of DO 
increment 



FINE 


Test for not equal 


0105024 


fTEQ 


Test for equal 


0105064 


FTLT 


Test for less than 


0105124 


FTGE 


Test for greater than 
or equal 


0105164 


FTLE 


Test for less than or 
equal 


0105324 


FTGT 


Test for greater than 


0105364 


KJNE 


Jump if not equal 


0105026 


FJEQ 


Jump if equal 


0105066 



DATA 



DATA 



DATA 



P2 



P3 



PH 



Address of DO loop 
counter 

Address of DO loop 
limit 

Address for jump if 
the counter is not 
greater than the 
limit 
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The third instruction, FDOl to control a DO loop with 
increment of I uses the following calling sequence 



DATA 


0105027 


BCS transfer to FDO 


DATA 


P1 


Address of DO loop 
counter 


DATA 


P2 


Address of DO loop 
limit 


DATA 


F3 


Address for jump 
if the counter is 
not greater than the 



The effective address is computed by subtracting one from 
the index value, multiplying the result by two, and then 
adding in the base address. This allows for an array with 
two word entries and induces from one to *n\ The effective 
address is stored in the second word of the following 
instruction. 

The reentrant subroutine call, FRSC, has the following call 
sequence: 



BCS 

DATA 



Subroutine address 



The DO loop is incremented and tested against the DO loop 
limit If the loop counter is less than the limit, execution 
continues at the address specified by the BCS call word 5. 
If the value of the loop counter is equal to or greater than 
the value represented by the limit, execution continues at 
the instruction following this calling sequence 

The calling sequence for alt the relational test (FT) and 
lump (FJ- ) instructions are as follows: 



BCS 
DATA 
DATA 
DATA 



Address of first number 
Address of second number 
Jump address 



These routines compare the two single precision floating- 
point numbers pointed to be the words following the BCS. 
The A register is set to minus one or zero, depending on 
the specified relation being met or not met, respectively. 
For the jump instructions, FJ ■-, the branch addcess is taken 
only when the condition is met, (i.e., when the A register 
equals minus one). Note that the specified relation is that 
of the first number to the second For example, FTGT tests 
for the first number greater than the second. 

The calling sequence for the arithmetic IF processor (FAIF), 
is as follows: 



The B register points to a memory location which is used as 
a stack pointer. This memory location is decremented and 
the resulting value used as the address where the return 
address is stored. 

Control is then transferred to the subroutine. Note that the 
subroutine address should be that of the first instruction of 
the subroutine. 

The reentrant subroutine return, FRSR, has a calling 
sequence consisting of just the BCS without parameters. 
The return address is popped off the stack using the B 
register and the memory stack pointer as in the subroutine 
call. Note that no limit checks are made on the stack by 
either the call or the return. Also, the stack pointer format 
is not consistent with that of the general stack firmware. 

The BCS calling sequence for FJAG (jump if A register 
greater than zero) is as follows: 



BCS 

DATA 



Jump address 



The jump address is taken only if the A register is strictly 
greater than (and not equal to) zero. 



BCS 

DATA 

DATA 

DATA 

DATA 

DATA 



Address of first number 
Address of second number 
Branch address if less than 
Branch address if equal 
Branch address if greater than 



This BCS also compares two single precision floating-point 
numbers. It determines if the first number is less than, 
equal to, or greater than the second number, and then 
takes the appropriate branch address. 

The indexed operand processor is used to compute the 
effective address of an element in a FORTRAN real array. It 
has the following call sequence: 



BCS 

DATA 
DATA 



Address of index value 
Base address 



20.2,5 Byte Manipulation Firmware 

The byte instructions use a byte pointer address where bits 
1 5-1 specify the word number and bit is for the left byte 
and 1 for the right byte. The byte-oriented instructions 
implemented in firmware are: 
Mnemonic Function BCS Call 



CBS Compare byte strings 

MBS Move byte string 



0105030 
0105070 



In the first microprogram sequence, the CBS instruction 
requires that the second word contain the address to which 
control is returned if the strings are not equal. The B 
register contains the byte starting address of the first 
string, the X register is the byte starting address of the 
second string, and the A register specifies the number of 
bytes to be compared 
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The second byte-oriented microprogram sequence, the MBS 
instruction, moves the number of bytes specified in the A 
register from the location specified by the 8 register to the 
location specified by the X register. 

Both share a common BCS entry point, and this may be 
extended for six more instructions. 



On all stack operations, if the top of-stack pointer (PTR) 
ever exceeds the boundaries of the stack (as the user 
defined them in the stack control block), no further 
processing takes place and a JMPM is made to the fourth 
word in the stack control block. 



Single-Precision Integer Stack Arithmetic 



20.2.6 Stack Firmware 

A stack is kept in memory for use for return addresses, 
temporary storage or arithmetic operations. The base and 
limit of the stack (see figure 20-1) are defined by the user 
The stack control block is indicated by a pointer in the 
second word of the calling sequence. Figure 20-2 is the 
format of the stack control block. 

The following BCS instructions correspond with each of the 
stack operations: 



Operation BCS 



Operation 



BCS 



Add 

Subtract 
Multiply 
Divide 



0105031 
0105071 
0105131 
0105171 



Push 


0105231 


Pop 


0105331 


Push double 


0105271 


Pop double 


0105371 



Eight stack instructions transfer to the same initial entry 
point in the WCS, where the decoder determines the 
specific instruction to be executed. 



T LIMIT 



STACK GROWS 
TOWARD LOW 
ADDRESS 



STACK i 



:y?k 



BASE 



INITIAL 
POINTER 



Add: adds the top two words of the stack, increments the 
pointer and replaces the new topmost word If the result 
exceeds the maximum positive number (077777), the 
overflow indicator (OF) and the sign in bit 15 are set to 
one. For example, adding 000002 to 077777 sets OF to one 
and the result to 100001 



Subtract: subtracts the next stack word from the top of 
stack word (by adding the top word to the twos comple 
ment of the next stack word), increments the top-of stack 
pointer, and stores the remainder in the new top of stack 
word. If the result exceeds the maximum negative number, 
it sets the overflow indicator and resets the sign. 



Multiply: multiplies the two words at the top of the stack 
and replaces them by their 32-bit product (see figure 20 3) 
The most significant part of the product is placed in the top 
word, and the least significant portion will be placed in the 
next word. The sign bit of the top word gives the sign of the 
product, and the sign of the next word is set to zero. The 
overflow indicator (OF) is not set. 



Word 



CURRENT STACK POINTER 



LIMIT OF STACK 



BASE OF STACK 



ADDRESS OF INSTRUCTION 
WHICH CAUSED STACK 
OVERFLOW OR UNDERFLOW 



ERROR ROUTINE FOR OVERFLOW 
OR UNDERFLOW 



Figure 20- 1 Base and Limit of Stack 



Figure 20*2. Stack Control Block 
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Divide: divides the top stack word into the following two 
words. The top-of stack pointer (PTR) is incremented and 
the single-precision quotient with the sign of the dividend is 
stored in the new top-ot stack location. The remainder is 
stored in the next stack location (see figure 20.4). 



Stack operators: these operators also require a stack 
control block as in figure 20-2. 

Push (SPUSH): the A register (RO) is placed on the stack at 
the location addressed by the decremented top-of-stack 
pointer (see figure 20-5.) 



BEFORE 



AFTER 




PTR 






s 


X 


■ 




s 


y 


32K 





PTR 



32K 





s 


x - y ( MS ) 


p 


x- y(LS) 





BEFORE 
SPUSH 



AFTER 
SPUSH 



PTR 



32 K 



PTR 



32K 



AREGISTER 



Figure 20 3. Stack Multiply 



Figure 20-5. Stack Push 



If the quotient overflows, the contents are unpredictable, 
and control is returned with the overflow indicator set (OF). 



Pop (SPOP): the A-register (RO) is loaded from the top 
stack word and the stack pointer is incremented (see figure 
206). 



P1R 



32 K 



BEFORE 



y (MS) 



y (MS) 



AFTER 



PTR 



32K 



+ y/± x = ± quotient q with remainder r 
Figure 20-4. Stack Divide 



BEFORE SPOP 



AFTER SPOP 



PTR 





INTO 
A REG 




ISTER 


X 


m 


^ 




PTR 







Figure 20-6. Stack Pop 
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Push Double (PUSHD): decrements the stack pointer and 
stores the B register (Rl), and then decrements the pointer 
and stores the A register (RO) (see figure 20 7). 



BEFORE 
SPUSHED 



AFTER 
SPUSHD 



PTR 



r2K 




PTR 




A REGISTER 


* 




BREGISTER 






32K 





Pop Double (POPD): loads the A register (RO) with the word 
addressed by the top-of-stack pointer and then increments 
the top-of-stack pointer; loads the B register (Rl) with the 
word addressed by the new value of the top-of-stack 
register and then increments the top-of-stack pointer again 
(see figure 20-8). 



AFTER POPD 






BEFORE POPD 




PTR 


X 




y 











PTR 





INTO A 
REGISTER 


X 






y 








INTO B 
REGiSTFR 







Figure 20-7. Stack Double Push 



Figure 20* Stack Double Pop 
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20.2.7 Firmware Macros 

The mnemonics given are not supported by the DAS MR 
assembler. The assembly-language programmer must 
supply hts own macros in order to use any of these 
mnemonics. The following are examples and possible use of 
the required macros. 



Macro 

Ftxed point add: 



Use 



XAD 



MAC 

DATA 
EMAC 



0105334, P( 1 ) 



XAO 



address 



Fixed point subtract: 



XSB 



MAC 

DATA 

EMAC 



010537U.Pt 1) 



XSB 



address 



Fixed point multiply: 



XMU 


MAC 




DATA 




EMAC 


Fixed point divide 


XDV 


MAC 




DATA 




EMAC 


Integer 


multiply: 


IMU 


MAC 




DATA 




EMAC 


Integer 


divide: 


IDV 


MAC 




DATA 




EMAC 



010527a. P( 1) 



0105234, P< 1 ) 



0105027. P( 1) 



0105067. P( 1 ) 



XMU 



address 



XDV 



IMU 



IDV 



address 



address 



address 



and, immediately following the macros 
for floating point divide, add: 

Floating square root: 



FSQ MAC 

DATA 0105127, P(1) 
BMAC 



FSQ 



address 



Floating point add 



FAD MAC 

DATA 0105 134,P( 1) 
EMAC 



FAD 



address 
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Floating , 


point subtract 


FSB 


KAC 




DATA 




EMAC 


Floating point multiply: 


FMU 


MAC 




DATA 




EMAC 


Floating point divide: 


FDV 


MAC 




DATA 




EMAC 


Load AB 




FLD 


MAC 




DATA 




EMAC 


Store AB 




FST 


MAC 




DATA 




EMAC 


Memory 


to memory: 


FMV 


MAC 




DATA 




EMAC 



010517a,P{ 1 ) 



010507U,P( 1) 



010503**, P( 1 ) 



0105032, P( 1) 



0105033, P( 1) 



0105037, P( 1) ,P( 1 ) 



FSB 



FMU 



FDV 



FLD 



FST 



FMV 



address 



address 



address 



address 



address 



address, address 



Pass parameters 



FSE 



MAC 
DATA 
BSS 
EMAC 



0105036, P< 1 ) 
P( 1 ) 



FSE 



Uparams 



DO loop: 

FDO MAC 

DATA 

EMAC 
DO loop (one increment): 
FDOI MAC 



0105035, P( 1 ) ,P(2) 
P(3) ,PU) 



FDO 



FD01 



DATA 0105027, P(1),P<2),P<3) 
EMAC 



inc addr , count addr 
lira addr, loop addr 



count addr, lim addr 
loop addr 
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Test for not equal: 

FTNE MAC 

DATA 010502U,P( 1),P(2) 
BMAC 



FTNE 



OP address, OP address 



(Typical relational test form). 

Jump if not equal: 

FJNE DATA 1 05026 , P( 1 ) , P( 2 ) , P ( 3 ) FJNE OP address, OP address 

jump address 

(Typical relational Jump form). 

Arithmetic IF processor: 

FAIF 

EKAC 

Index operand processor: 



MAC PAIF OP address, OP address, 

DATA 0105226, P( 1) ,P<2) , P( 3 ) , P< 4 ) , P( 5 ) LT address, EQ address, 

GT address 



FIOP MAC 

DATA 0105167,P< 1>,F(2) 
EMAC 



FIOP 



index address, base 
address 



Reentrant subroutine call: 

FRSC MAC 

DATA 0105025, P(1) 
EMAC 



FRSC 



sub address 



Reentrant subroutine return: 



FRSR MAC 

DATA 0105065 
EMAC 



FRSR 



Jump if A register greater: 

FJAG MAC 

DATA 0105125, P<1) 
EMAC 



FJAG jump address 



Compare string: 

CBS MAC 

DATA 0105030, P(1) 
EMAC 



Move string 



CBS 



non compare addr 



MBS 



MAC 

DATA 105070 

EMAC 



MBS 
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Stack add 



SADD MAC 

DATA 0105031, P(1) 

EMAC 



SADD stack addr 



Stack subtract: 



SSUB MAC 

DATA 0105071, P<1) 
EMAC 



SSUB stack addr 



Stack multiply: 

SMUL MAC 

DATA 0105131 ,P(1) 
BMAC 

Stack divide: 



SMUL stack addr 



SDIV MAC 

DATA 0105171, P(1) 
BMAC 



SDIV stack addr 



Stack push: 

SPUSH MAC 

DATA 0105231 r P(1) 



EMAC 



Stack pop: 



SPUSH stack addr 



SPOP MAC 

DATA 0105331, P(1) 
EMAC 

Stack push double: 



SPOP stack addr 



SPUSHD MAC 

DATA 0105271, P(1) 
EMAC 



SPUSHD stack addr 



Stack pop double: 



SPOPD MAC 

DATA 0105371, P(1) 
BMAC 



SPOPD stack addr 
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The Floating Point Processor has the following OP codes. 



Mnemonic 



Opcode 



Operation 



FLD 


0105420 


FLDD 


0105522 


FAD 


0105410 


FADD 


0105503 


FSB 


0105450 


FSBD 


0105543 


FMU 


0105416 


FMUD 


0105506 


FDV 


0105401 


FDVD 


0105535 


FLT 


0105425 


FIX 


0105621 


FST 


0105600 


FSTD 


0105710 



Floating load single 
Floating load double 
Floating add single 
Floating add double 
Floating subtract single 
Floating subtract double 
Floating multiply single 
Floating multiply double 
Floating divide single 
Floating divide double 
Fix to float 
Float to fix 
Floating store single 
Floating store double 



Load or Float interrupts are locked out until a store or fix. 
EX34, - as time out. 

An interrupt after a store may change floating point 
registers. User should restore their contents 



Mnemonics for floating point operations are not supported 
by DAS MR. The following are possible macros which must 
be included by the user to define the mnemonics: 

Macro Use 

FLD MAC FLD address 

DATA 0105420, P(1) 
EMAC 

FLDD MAC FLDD address 

DATA 0105522,P(1> 
EMAC 

FAD MAC FAD address 

DATA 0105410, P<1) 
EMAC 

FADD MAC FADD address 

DATA 0105503,P(1) 
EMAC 

FSB MAC FSB address 

DATA 0105450,P<1) 
EMAC 

FSBD MAC FSBD address 

DATA 0105543, P(1) 
EMAC 

FMU MAC FMU address 

DATA 0105416, P<1) 
EMAC 
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FMUD 



MAC 

DATA 

BMAC 



0105506, P{ 1 ) 



FMUD 



address 



PDV 



MAC 

DATA 
BMAC 



0105*101, P( 1 ) 



FDV 



address 



FDVD 



MAC 

DATA 
EMAC 



0105535, P( 1) 



FDVD 



address 



FLT 



MAC 

DATA 
EMAC 



0105425, P( 1 ) 



FLT 



address 



FIX 



MAC 

DATA 

EMAC 



0105621 ,P( 1 ) 



FIX 



address 



FST 



MAC 

DATA 
EMAC 



0105600, P( 1) 



FST 



address 



FSTD 



MAC 

DATA 

EMAC 



0105710, P( 1) 



FSTD 



address 



20.2.8 Commercial Firmware 

Commercial firmware is available on the 70 series comput- 
ers for supporting VORTEX, COBOL, and TOTAL The 
firmware and assembly language routine V$DECM (see 
sectton 13), also extends the capabilities of the user's 
assembly language programs. 

Commercial firmware includes the following operations: 

• COBOL decode 

• Load/Store multiple registers 

• Main storage move or compare 
- 32 bit unsigned math 

Additionally, an assembly language routine V$DECM is 
provided in the support library for interface to the firmware 
decimal math routines. 



The Commercial Firmware package is optionally available 
with the FORTRAN accelerator package requiring 1024 
words of WCS on a V70 series computer. 



COBOL Decode 

COBOL decode uses the most significant 5 bits of the 
specified word of main storage to perform a 32 way branch 
Register R2(X) points to the main storage word to be 
decoded. The BCS is followed by the 32 vector addresses. 
When the BCS is complete, R0(A) contains and R1(B) 
contains the least significant eleven bits (left justified) R2 
is not incremented. The calling routine uses the following 
sequence: 



DATA 
DATA 
DATA 



0105021 

vector address zero 

vector address one 



BCS value 



DATA 



vector address thirty-one 
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Load/ Store Registers 

Multiple register loading or storing is performed by the 
following BCS instructions: 

Registers loaded/ stored 



At the end of each byte move or compare, byte pointers are 
incremented Optionally, the user may specify non-incre 
menting of the first block byte potnter. This will result in 
storing a single byte value throughout a block of main 
storage or comparing a single byte value to a block of main 
storage. 



DATA 



DATA 



0105020 


lo 


ad 


R0 




0105060 




i 


R0,R 




0105120 






R0, . 


. . ,R2 


0105160 






R0,. 


. . ,R3 


0105220 






R0, . 


. . ,RH 


0105260 






R0,. 


.. ,R5 


0105320 




' 


R0, . 


. . ,R6 


0105360 


load 


R0, . 


.,R7 


0105017 


store 


R0 




0105057 


, 


1 


R0,R 1 




10 5 117 






R0, . . 


. , R2 


0105157 






R0,.. 


.,R3 


0105217 






R0, . . 


. ,R4 


0105257 






R0,.. 


. ,R5 


0105317 


1 


f 


R0, . . 


. ,R6 


0105357 


stc 


>re 


R0,.. 


.,R7 



R7 contains the main storage address for loading or storing 
registers. Register contents are stored in main storage as 
follows: 



R7 before storage 



R7 after storage 



B m- 


Rn 




Rn-1 




• 




RO 









addr 

x 



x-1 



xn 
x-n-1 



R7 is decremented to the location following the contents of 
R0. For load registers, R7 initially points to the word 
following R0. After loading is complete, R7 will point to the 
last register loaded. 



Main Storage Move or Compare 



The Move routine moves a byte block of mam storage from 
one area to another (overlap is allowed). The compare 
routine compares two byte blocks of main storage. The 
compare is logical and sets a user supplied condition word 
as follows: 

- first block less than second block 

1 - first block equal to second block 

2 « first block greater than second block 



Initially R0(A) points to the user's descriptive parameter 
block and R1(B) contains the address of the user's 
condition word. The parameter block appears as follows: 

word byte addr of first main storage block 

1 byte addr of second main storage block 

2 number of bytes for move or compare 

The calling routine will issue one of the following BCS 
values: 

0105223 Move without increment 

0105263 Compare with increment 

0105323 Compare without increment 

0105363 Compare with increment 

When execution is complete, parameter block contents are 
as follows: 

Move without increment 



word 
word 1 
word 2 



single byte address 

last byte stored address + 1 



Move with Increment 

word * last byte fetched address 
word 1 « last byte stored address + 1 
word 2-0 

Compare without increment 



word 
word 1 



word 2 



» single byte address 

» last byte compared address 

tf equal 
~ last byte compared address 

if unequal 
« if equal. Otherwise 

decremented once for each 

equal byte 



+ 1 



Compare with increment 



word - last byte compared address 
word 1 « last byte compared address 
+ 1 if equal. 
- last byte compared address if 
unequal, 
word 2 - if equal. Otherwise 

decremented once for each 
equal byte. 
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32 Bit Integer Math 

These routines perform the operations add, subtract, 
multiply, and divide on 32 bit unsigned integer operands. 
Register RO(A) contains the four word parameter block 
address. The four word parameter block contains the two 
operands and received the results as follows; 

add Operand two is replaced by the sum of the 

two operands. 

subtract Operand two is replaced by operand one 
minus operand two. 



multiply 



Both operands are replaced by the 4 word 
product of the two operands. 

Operand one receives the quotient of 
operand one divided by operand two; 
operand two is replaced by the remainder. 



The hardware overflow flag is set when any of the following 
occur: 

• carry out of the most significant bit during an add. 

• subtracting a larger number from a smaller one. 

• dividing by zero. 
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SECTION 21 

FILE MAINTENANCE UTILITY 



The File Maintenance Utility program (FMUTIL) iS_jL, 
background task for copying and /or loading files, file 
directories and/or partitions from one de vice onto another, 
f or manipuj ating files and records, for formatting iiles. and 
records which are to_be_disp!a^eil_oi_pi!^^ 
managing TJIename directories and space allocations of. the 



Only files assigned to rotating memory devices (disc or 
drum) can be referenced by name. 

Ftle space is allocated contiguously within a partition, 
skipping bad tracks 



21.1 ORGANIZATION 

FMUTIL is scheduled for execution by inputting the JCP 
directive /FMUTIL. ff the SI logical unit is a teletype or a 
CRT device, the message FU** is output to indicate that 
the SI unit is waiting for FMUTIL input. Once activated, 
FMUTIL accepts directives from the SI unit until: 

a. Another JCP directive (first character is a slash) is 
input, or 

b. The exit directive, E, is input. 

In either case, FMUTIL terminates and JCP is scheduled. 



All FMUTIL listings begin with the standard VORTEX 
headings. 



21.4 FILE MAINTENANCE UTILITY DIRECTIVES 

The following file maintenance utility functions are sup 
ported by FMUTIL: 

D Dumps RMD files, partitions, and file name directories 
to magnetic tape. 

L Loads RMD files, partitions, and file name directories 
from magnetic tape. 

R Rewinds magnetic tape 

E Writes end-of-file on magnetic tape. 

jS Searches for RMD files, partitions, and file name 
[^ directories on magnetic tape. 

P Prints a listing of file names contained on each 
directory. 

U Releases all unused space in each file 

E Exits from FMUTIL. 



If there ts an error, one of the error messages given in 
appendix A is output on the SO logical unit, and a record is 
input from the SO unit to the JCP buffer. If the first 
character of this record is /, FMUTIL exits via the EXIT 
request. If the first character is C, FMUTIL continues. If the 
first character is neither / or C, the record is processed as 
,i normal FMUTIL directive. 



21.2 PARTITION SPECIFICATION TABLE 

For a description of the Partition Specification Table (PST) 
and File Name Directory, refer to section 9.1. 



File maintenance utility directives comprise sequences of 
character strings having no embedded blanks. The charac 
ters strings are separated by commas (,) or key equal signs 
( - ). Although not required, a period (.) is a line 
terminator. Comments can be inserted after the period. 

The general form of a file maintenance utility directive is 

directive, p(I),l<2) p(n) 

where 



directive 



is one of the directive 
names given above. 



21.3 OUTPUT LISTINGS 

FMUTIL outputs the following two types of listings to the LO 
logical unit: 

a Directive Listing lists, without modification, all FMUTIL 
directives entered from SI logical unit. 

b. Directory Listing, lists file names from a logical unit 
filename directory in response to the FMUTIL,P,D, and 
L directives. 



Ptt) 



is a parameter 



Numerical data can be octal or decimal. Each octal number 
has a leading zero. 

For greater clarity in the descriptions of the directives, 
optional blank separators between character strings, and 
the optional replacement of commas (,) by equal signs ( * ) 
are omitted. 
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Error messages applicable to file maintenance utility 
directives are given in appendix A 



21.5 D DIRECTIVE 

This directive dumps information contained in files, 
partitions, and/or directories onto magnetic tape where 
this information can be later re loaded onto the RMD, or 
stored for later use. There are three types of D directives; 
one for file, one for partitions, and one for directories. 



21.5.1 Dump File 

The directive for dumping a file has the following general 
form 

D,!un, key, fHe.tapehin 

where 



tun 

hey 

file 
tape tun 



is the number of name of the input 
logical unit 

is the partition protection code. 

is the name of the file being dumped. 

is the number or name of the output 
logical unit (magnetic tape only) 



When a file is dumped to magnetic tape, it is organized 
with a header record, end-of-file, n file records, and 
terminates with a double end of-file. The file, after the 
dump with the header record, is formatted as follows: 

Each n file record has 5,760 words, except for the last 
which has the remaining number of words in the file. In 
other words, the last record may have less than 5,760 
words. 

On a dump file directive a listing is output. The listing 
output format is as follows: 

Ml XXXX XX/XX/XX XXtXXiXX VOUTBX fKTLCK PMUT2L 

D,22,X,COBINT, 18 

COBIHT 111 141 

The top heading line consists of: 

a. One blank 

b. The word PAGE 

c. Four character positions that contain the decimal page 
number 

d. Two blanks 

e. Eight character positions that contain the current data 
obtained from the VORTEX resident constant V$DATE. 



15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



Word 


'P 


T 


Word 1 


'L' 


f E' 


Word 2 
Word 3 
Word 4 
Word 5 
Word 6 
Word 7 
Word 8 
Word 9 
Word 10 
Word 11 


FCB 




end of file 



5760 word data record 


• 
• 


5760 word data record 


£ 5760 word last data record 


end-of-file 


endof-file 
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f. Two blanks 

g. Eight character positions that contain the current time 
HR:MN:SC. 

h. Two blanks 

i. Name of runtime operating system. 

j Two blanks 

k. The /JOB name of which the system is executing 

I. Two blanks 

m. Eight character positions that contain the job processor 
name, FMUTIL 

n. Blanks through the 120th character position. 

Beginning with the first character position, the next line 
(after 2 blank lines) contains the list of the input directives. 

Beginning with the first character position the next line 
contains: the name of the file, number of sectors used, 
number of sectors unused, and the number of total sectors 
allocated to the file. 

Example: Dump the file COBINT contained on logical unit 
22, whose protection code is X, onto magnetic tape unit 18. 



21.5.2 Dump Partition 

The directive for dumping a partition has the following 
general form 

D.luMey.ALL.tapehin 



where 



lun 



key 



ALL 



is the number or name of the input 
logical unit. 



is the protection code required to 
address lun. 



is the output logical unit (magnetic 
tape only). 



keyword specifying partition dump 



All partitions dumped onto magnetic tape are organized 
with a header record, n files record, and terminated by an 
end-off He. 



D,22,X, COBINT, 18 



The header record is formatted as follows: 



Bit 


15 


14 


13 12 11 10 9 8 


7 6 ! 


5 4 3 2 


1 


Word 


•P* 


'A* 


Word 1 


•R' 


T 


Word 2 


number of file entries 


Word 3 


logical unit number 


Word 4 
Word 5 
Word 6 
Word 7 


all zeros 




end-of file 
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An alternate name record has the format shown below: 



Bit 


15 14 


IS 


12 11 10 9 8 


7 6 5 4 3 2 10 


Word 


E' 


■N 1 


Word 1 


'T- 


R" 


Word 2 












Word 3 






Entry Name 






Word 4 












Word 5 












Word 6 






Original Name 






Word 7 












Word 8 






file size 












end of-file 







A partition dump directive produces a listing This listing 
output format has the following FMUTIL heading, a one line 
heading as shown below 

FILENAME USED UNUSED TOTAL LOGICAL UNIT-XXXX 

The heading line consists of 

a One blank 

b. The word FILENAME that shows an alphabetical list of 
afl the file located on a particular partition. 

c Four blanks 



Example: Dump the partition contained on logical unit 
OM, protection code D, onto magnetic tape unit 18. 

D,OM,D,AL, 18 



21.5.3 Dump File-Name Directory 

The directive for dumping a directory has the following 
general form 

D,km t fcey,DIR,tapefcjn 



d The word USED shows many sectors, of each file, 
contain information 

e Four blanks 

f The word UNUSED shows how many sectors contain 
blanks 

g. Five blanks 

h The word TOTAL shows the total number of sectors 
allocated to each file. 

i Forty spaces 



where 



key 



DIR 



is the number or name of the input 
logical unit. 

is the protection code required to 
address tun. 

is the number or name of the 
output logical unit, (magnetic tape 
only ) 



keyword specifying directory dump 



j. The words LOGICAL UNIT shows what logical unit the 
files are located on 

k Four character positions that contain the logical unit 
number. 



A filename directory dumped to magnetic tape is organized 
into a header record, directory record, and double end of 
file. The header record is formatted as follows: 
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Bit 


IS 


14 13 12 11 10 9 8 


7 6 5 4 3 


2 1 


Word 


•D' 


T 


Word 1 


'R' 


blank 


Word 2 




all zeros 






Word 3 


logical unit number 


Word 4 










Word 5 




all zeros 






Word 6 










Word 7 












end of file 



The directory record has the following format: 



Bit 



15 14 13 12 11 10 9 8 7 6 5 4 3 2 1 



Word 


Directory Sector Addr 


1120 


120 word directory block 


121 


Directory Sector Addr 


122241 


120 word directory block 




• 


5639 


Directory Sector Addr 


5640 5759 


120 word directory block 




end of file 




end -of file 
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Example: Dump directories for partition contained on 
logical unit OM t protection code D, onto magnetic tape unit 
18. 

D.OM.D.DIR. 18 



21.6.2 Load Partition 

The directive lor loading a partition has the following 
general form 

L,lun,*eyALL, tapelun 



21.6 L DIRECTIVE 

This directive loads information into RMD files, partitions, 
and/or directives from magnetic tape. 

There are three types of L directives, one for files, one for 
partitions, and one for directories. 



21.6.1 Load File 

The directive for loading a file has the following general 
form 

L,lun,Jcey,file,tapelun 

where 

tun is the number or name of the output 

logical unit. 



where 

lun is the number or name of the 

output logical unit. 

key is the partition protection code 

tapelun is the number or name of the input 

magnetic tape unit. 

ALL keyword specifying partition load. 

When a partition is loaded, from magnetic tape, a search is 
made for it as specified by the logical unit number 
parameter. After the search tape is positioned in front of 
the required partition dump, the search stops if a triple 
end of file is encountered and an error message is output. 



key is the partition protection code. 

file is the name of the file being loaded. 

tapelun is the number or name of the input 

magnetic tape unit. 



When a file ts being loaded from magnetic tape, a search is 
made for that file. After the search, the tape is positioned 
m front of the file within the correct partition dump. The 
search stops if a double end-of-file is encountered and an 
error message is output. After the file is located, an 
attempt is made to create the file space. If the file already 
exists the existing file is used. If the existing file is too 
small, an error message is output. 

When creating a file for loading, the file size of the created 
file will include all of the original extent of the file, 
including the unused portion. 

When a file already exits, the only check made is to see if 
there is enough space for the used portion of the file as on 
the tape, and the original extent of the file is ignored. 

On a load file directive a listing is output. The listing output 
format is the same as the D directive when files are called. 
The only change would be the directive shown on the 
listing. 

Example: Load the file COBINT contained on magnetic 
tape unit 18 onto RMD logical unit 22, protection code is X. 



L, 22.X, COBINT, 18 



When the partition is found, the files are loaded as 
indicated key file loading in the order in which they appear 
on the tape. If any non-previous record names are 
encountered, an entry is made in the directory for them. 

During the loading of a partition, space for the directory is 
allocated at the beginning of the partition. After loading. 
however, there is no embedded unused space in the 
partition. All unused space is at the end of the partition. 

On a partition load directive, a listing is output The listing 
output has the following FMUTIL heading, a one line 
heading as shown below: 

riLKMAJU USID UHUS1D TOTAL STMT IMD LOGICAL UNIT-XXXX 

The heading line consists of: 

a. One blank 

b. The word FILENAME that gives a list of all filenames 
now contained in the partition. 

c. Four blanks 

d. The word USED shows how many sectors per filename 
contain valid information. 

e. Four blanks 

f. The word UNUSED shows how many sectors per 
filename contain blanks. 

g. Five blanks 
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h. The word TOTAL shows how many sectors have been 
allocated to each file. 

i. Ten blanks 

j. The word START shows the beginning sector number 

k. Seven blanks 

I The word END shows the ending sector numbers. 

m. Fifteen blanks 

n. The word LOGICAL UNIT shows on which logical unit 
(partition) these files are contained. 

o. Four character positions that contain the logical unit 
number. 



Example: Load the partition contained on magnetic tape, 
which is on logical unit 18, onto RMD logical unit name 
OM, protection code. 

L,OM,D,ALI., 18 



Example: Load directory for partition contained on 
magnetic tape, on magnetic tape unit 18, onto RMD logical 
unit OM, protection code is D. 

L.OM.D.DIR, 18 



21.7 R DIRECTIVE 

This directive rewinds a magnetic tape to the beginning of 
tape. The directive has the general form 

R.lun 



where 

km is the number or name of the 

input or output magnetic tape 
unit. 

Example: Rewind magnetic tape located on logical unit 
18. 

R, 18 



21.6.3 Load Directory 

The directive for loading filename directories has the 
following general form 



L,lun,key,DIR,tapelun 



where 



lun 



is the number or name of the 
output logic a i unit. 



21.8 E. DIRECTIVE 

This directive writes an end of-file on a magnetic tape The 
directive has the general form 



E.lun 



where 



lun is the number or name of the 

output magnetic tape unit. 



key is the protection code required 

to address lun. 

tapelun is the number or name of the 

input magnetic tape unit. 

DIR keyword specifying directory load. 

When a directory is being loaded, a search is made for it on 
the input magnetic tape, after the search tape is positioned 
in front of the required partition directory. 

If the directory is found its sectors are loaded onto their 
former recorded sectors. No reorganization takes place. 

If the directory is not found or if a triple end of tile is 
encountered, an error message is output, and the search 
stops. 



This directive should be used after writing a series of files 
onto magnetic tape instance: 

jHtadof Record , EOF , Sf.es of Partition Fil«s f EOF j EOf | EOF *| 
♦The E directive is used to write the third end-of-fiie. 
B. 18 



21.9 S DIRECTIVE 

This directive searches for files, partitions, and directories 
located on magnetic tapes. The directive has the general 
form 

S, lun, key, tapelun 
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where 



tun 



key 



tapelun 



is the number or name of the 
RMD's logical unit. 

is the protection code required 
for addressing lun 

is the number or name of the 
input magnetic tape unit. 



After the search, the tape wit! be positioned after the 
partition or file identification record, and is now ready for 
the loading of individual files. 

Example: Search for the partition, file or directory named 
OM, protection code D, located on logical unit 18. 

S , OM , D , 1 8 



g. Five blanks 

h. The wora iOTAL shows how many sectors have been 
allocated for each file. 

i. Ten blanks 

j The word START shows the beginning sector number. 

k. Seven blanks 

I. The word END shows the ending sector number. 

m. Fifteen blanks 

n. The words LOGICAL UNIT, one character, a dash (-), 
shows upon which logical unit (partition) these files are 
contained. 

o. Four character positions that contain the logical unit 
number. 



21.10 P DIRECTIVE 

This directive prints out a listing of the file directory on the 
LO for each partition specified. The directive has the 
general form 

P.lun.key 



where 



lun 



key 



is the number or name of the 
input logical unit. 

is the protection code required 
for addressing lun. 



Files are listed in alphabetical order. The output listing has, 
following the FMUTIL heading, a one-line heading as shown 

below 

FILENAME USED UHUStD TOTAL START END LOGICAL UNIT-XXXX 

The heading line consists of: 
a. One blank 



Example: Print a listing of OM, protection code O. 
P , OM , D 

21.11 U DIRECTIVE 

This directive releases unused space from files, after they 
have been written on the RMD. The directive has the 
general form 

U.lun fcey.file 



where 



lun is the number or name of the 

logical unit where space to be 
released is located in the 
protection code 

key is the protection code required 

for addressing lun. 

file is the name of the file where 

the unused space is located. 



b The word FILENAME that gives a list of all filenames 
contained in a partition. 

c. Four blanks 



Example: Release unused space located in file COBINT, 
on partition 22, protection code X. 

U, 22, X, COBINT 



d. The word USED shows how many sectors per filename 
contain information 

e. Four blanks 

f The word UNUSED shows how many sectors per 
filename contain blanks 



21.12 EXIT DIRECTIVE 

This directive exits from FMUTIL. The directive has the 
general form 



21 8 



where 



keyword specifying EXIT from 
FMUTIL 



Example: Exit from FMUTIL 
B 
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APPENDIX A 
ERROR MESSAGES 



This appendix comprises a directory of VORTEX operating 
system error messages, arranged by VORTEX component 
For easy reference, the number of the subsection contain 
mg the error messages for a component ends with a 
number corresponding to that of the section that covers the 
component itself, e.g., the file-maintenance error messages 
are listed in subsection A. 9 because the file-maintenance 
component itself is discussed in section 9. 



A.l ERROR MESSAGE INDEX 

Except for the language processors (section 5), VORTEX 
error messages each begin with two letters that indicate 
the corresponding component: 



Messages 
beginning 

with: 

CM 
DG 
DP 



Are from 
component: 

Concordance program 
Debugging program 
Dataplot It 



Listed in 
subsections: 

A.5.3 
A. 7 

A. 12 



FX 

IM 

10 

IU 

JC 

LG 

MS 

MU 

NC 

OC 

RP 

RT 

SE 

SG 

SM 

ST 



Real time executive 
f tie maintenance 
I/O control 
I/O utility 

Jobcontrol processor 
Load module generator 
Microprogram simulator 
Microprogram utthty 
VTAM Network control 
Operator communication 
RPG IV Compiler 
RPG IV Runtime/Loader 
Source editor 
System generator 
System maintenance 
VSORT 
DAS MR assembler 



A ? 
A 9 
A3 
A. 10 
A4 
A. 6 

A 20- 2 
A 20 3 
A2i 
A 17 
A3 
A 5.3 
A. 8 
A .15 
A 16 
All 
A5.1 



Section A. 24 gives explanations of error codes listed under 
"Possible User Action" in the last column of the following 
sections 



A.2 REALTIME EXECUTIVE 









Possible 








User 


Message 


Condition 


Action 


Action 


EX01, XXXXXX 


Invalid RTf service 


Abort task 


D01.D02.P01 




request by task xxxxxx 


xxxxxx 




EX02, xxxxxx 


Scheduled task xxxxxx 


Abort task 


D01.D03 




name not in specified 


xxxxxx 






load module library 






EX03,xxxxxx 


Task xxxxxx made 


Continue 


D01.D03 




RESUME request but re 


scheduling 






quested task not found 


task 




EX04,xxxxxx 


Task xxxxxx made ABORT 


Task xxxxxx 


D01.D03 




request but requested 


continues 






task not found 






EX05, xxxxxx 


Background task xxxxxx 


Task xxxxxx 


M01.MO2.MO3 




larger than allocatable 


not loaded 


M04.P02 


EX06,xxxxxx 


Not enough allocatable 


Abort task 


M06 




space available for 


xxxxxx 






AiOC request 






EX07, xxxxxx 


OVLAY requests a seg 


Abort t.isk 


DOI.D03 




inent not in library 


XXXXXX 





4 ; 



ERROR MESSAGES 



EXIO.xxxxxx 



Scheduled request h<*s 
a library task priority 
conflict (task priority 
from foreground 
library, task priority 
2 from background 
library). Scheduled 
request specifies a 
foreground task to be 
executed at priority 
or 1 



Schedule 
request ig 
nored, 
scheduling 
task continues 



DO4,DO?.P01 



EXll,xxxxxx,n 



Memory protection vio 
lation at address n 



Abort task 
xxxxxx 



P03 



EX12, xxxxxx 



EX13, xxxxxx 



I/O link error (fore 
ground task making 
request, or incorrect 
logical unit number) 

Attempted to load map 
registers and a sense 
DMA-error stop condition 
occurred 



Abort task 
xxxxxx 



Abort task 
xxxxxx 



P01 



H05 



EX14, xxxxxx 



Lack allocable TIDB 
memory space for task 
xxxxxx attempted to 
be scheduled 



If an OPCOM 
request, OP 
COM is 
aborted. If 
the schedule 
is not an 
OPCOM, 
the request is 
reattempted 



M02 



EX15, xxxxxx 



EX16,xxxxxx 



Foreground common 
specified by back 
ground task 

PASS macro specified 
zero or negative word 
count 



Abort task 
xxxxxx 



Abort task 
xxxxxx 



P01 



P01 



EX17, xxxxxx 



RMD I/O error detected 
when SAL attempted to 
load scheduled task, 
xxxxxx. Also pseud o 
TIDB data assumed bad, 
execution address less 
than 01000 



Abort task 
xxxxxx 



H06 r P01 



EX20,xxxxxx,h 



Map memory-protection 
HALT violation at 
virtual address n in 
task xxxxxx 



Abort task 
xxxxxx 



P17 



Note: xxxxxx is the name of a task 
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EX21,xxxxxx t n 



Map memory protection 
I/O violation at 
virtual address n in 
task xxxxxx. User 
attempted to execute 
I/O command in a map 
other than map 



Abort task 
xxxxxx 



P17 



EX22,xxxxxx,n 



Map memory-protection 
WRITE violation at 
virtual address n in 
task xxxxxx. User 
attempted to write/ 
store into readonly 
or read-operand only 
location 



Abort task 
xxxxxx 



P17 



EX23,xxxxxx,n,m 



Map memory-protection 
JUMP violation at 
virtual address n in 
task xxxxxx. User 
attempted to jump into 
read-operand only 
location m + 2 



Abort task 
xxxxxx 



P17 



EX24, xxxxxx, n ( m 



Map memory protection 
UNASSIGNED violation 
at virtual address n 
in task xxxxxx. User 
attempted to read or 
write into unasstgned 
location m 



Abort task 
xxxxxx 



P17 



EX25.xxxxxx n 



Map memory protection 
instruction fetch 
violation at virtual 
address n in task 
xxxxxx. User attempted 
to fetch an instruction 
from read-operand-only 
location 



Abort task 
xxxxxx 



EX26,xxxxxx,m 



Firmware floating 
point or stack over- 
flow or underflow 
occurred at logical 
address or in task 
xxxxxx. 



Task is 
continued at 
location n +2 



None 



EX27, xxxxxx 



ALOCPG request error. 
Parameter error or 
pages not available 
for allocation. 



Program con 
tinues execu 
tion at speci 
tied reject 
address 



P01 
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EX30,xxxxxx 


DEALPG request error. 


Program con 




Parameter error. Pro 


. tinues execu 




gram continues execution 


tion at sped 




at specified reject 


tied reject 




address 


address 


EX31,xxxxxx 


MAPIN request error. 


Program con 




Request executed by 


tinues execu 




priority task 


at specified 
reject address 


EX32,xxxxxx 


Attempted to schedule 


Directive 




a task from a non-RMD 


ignored 




unit 




EX33,xxxxxx 


Floating-point proc 


Program con 




essor, FPP, error 


tinues at the 
address follow 
ing the FPP 
store instruc 
tion 


EX34,xxxxxx 


Floating point proc- 


Program con 




essor, FPP, timeout 


tinues at 

interrupted 

instruction 



POi 



P01 



D02.P01 



None 



None 



The instruction which generated the memory-protec- 
tion violation and the contents of the A, B, and X (and 
V75) registers are also posted 

Note: xxxxxx is the name of a task 



A.3 I/O CONTROL 









Possible 








User 


Message 


Condition 


Action 


Action 


lOOO.xxxxxx 


Unit not ready, or 


Repeats mess 


H01.H03 




unit file protected 


age until con 
dition is cor 
rected 




lOOl.xxxxxx 


Device declared down 


Repeats mess 
age until con 
dition is cor 
rected 


H04.D19 


IO02,xxxxxx 


Invalid LUN specified 


Abort task 
or request 


D02.P01 
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IO03.xxxxxx 



1004, xxxxxx 



FCB/DCB parameter error 



Invalid protection code 



Abort task 
or request 

Abort task 
or request 



P04 



D0l.D02.P01 



I005.XXXXXX 



I006.xxxxxx 



IO07.xxxxxx 



Protected partition Abort task 

specified by unpro or request 

tec ted task 

I/O request error, Abort task 

e.g., I/O complete or request 

bit not set, prior 
request may be queued 

Attempt to read from a Abort task 

write-only device, or or request 

vice versa 



P01 



P01 



D02.P01 



KHO.xxxxxx 



lOll.xxxxxx 



File name specified in Abort task D01,D03,P01, 

OPEN or CLOSE not found or request D29 

Invalid file extent, Abort task P04.P01 

record number, address or request 
or skip parameter, file 
already closed 



I012.XXXXXX 



RMD OPEN/CLOSE error, 
or bad directory thread, 
seek or read error on OPEN 
request. 



Abort task 
or request 



H05.D03 



1013, xxxxxx 



Level program read a 
JCP (/) directive 



Task xxxxxx 
is aborted, 



None 



directive 
passed to JCP 
buffer 



1014, xxxxxx 



Interrupt timed out or 
no cylinder search 
complete interrupt 



Abort task 
or request 



H05.D05 



1015, xxxxxx 
I016,xxxxxx 
I017 t xxxxxx 
I020,xxxx 



Disc cylinder-search 
or malfunction error 

Disc read/write timing 
error 

Disc end of track error 



BIC: abnormal stop, 
not ready, or time out 
error on device xxxx 



Abort task 
or request 

Abort task 
or request 

Abort task 
or request 

Abort task 
or request 



H05 



H05 



H05 



D05.H05 



1030, xxxxxx 



Parity error 



Abort task 
or request 



H05.D02 
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I031.XXXXXX 


Reader or tape error 


Abort task 
or request 


I032,xxxxxx 


Odd-length record error 


Abort task 
or request 


I033,xxxxxx 


Invalid terminal 
identifier or logical 
line number 


Request 
ignored 


I034 t xxxxxx 


Line or terminal not 
opened 


Request 
ignored 


I035,xxxxxx 


Line or terminal down 


Request 
ignored 


I036,xxxxxx 


Line or terminal already 
open 


Request 
ignored 


I037,xxxxxx 


Request still pending 


Request 
ignored 


IO40,xxxxxx 


Action on terminal not 
opened 


Request 
ignored 


I042,xxxxxx 


Invalid physical Itne 
address 


Request 
ignored 


I043,xxxxxx 


Invalid TCM type 


Request 
ignored 


I044,xxxxxx 


No temporary storage 
available 


Request 
ignored 


I045,xxxxxx 


RMD error. Format, 
end of -file or head 
selection error 


Abort task 
or request 


I046,xxxxxx 


Map memory protection 
I/O data transfer error 


Abort task 
or request 


I047,xxxxxx 


User write specified 
word count > 7 3 


Record is 
truncated 


I05x t xxxxxx 


RMD read error on spool 
stream X. Specified 


The data is 
used 



H05.P19 



H05.P12 



D27 



D28 



D28 



D28 



None 



D28 



D27 



027 



None 



H05.D13 



H05 



P04 



H06 



stream is last digit 
of error number 



IO60,xxxxxx 



RMD file full 



The program 
waits until 
space is avail 
able on the 
file. The 
message is re 
pea ted every 
200 times the 
condition 
occurs 



DOS 
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I061 t xxxxxx 



User parameter error 
in request 



Request is 
ignored 



P01 



I062,xxxxxx 



RMD wnte error 



The bad sec 
tor is 

skipped. This 
is likely to 
cause an I05x 
error later, 
but no data 
will be lost 



H06 



l063.xxKxxx 



Buffer unavailable 
for spooler 



Spooler waits 
until buffer 
is available 



None 



Hot*: xxxxxx is the name of a task or device 



A.4 JOB-CONTROL PROCESSOR 



Message 
JC01 



Condition 

Invalid JCP directive 



Action 

Ignore 
directive 



Possible 

User 

Action 

D01.D02 



JC02 



JC03 



JC04 



Invalid or missing 
parameter in a JCP 
directive; or illegal 
separator or terminator 

Specified physical 
device cannot perform 
the functions of the 
assigned logical unit 

Invalid protection 
code or file name in 
a JCP directive 



Ignore 
directive 



Ignore 
directive 



Ignore 
directive 



D01.D02 



D07.H06 



D01.D02 



JCOS.nn 



End of tape before the 
number of files spec 
ified by an /SFILE 
directive has been 
skipped; or end of 
tape, beginning of tape, 
or file mark before the 
number of records spee- 
ded by an /SREC di 
rective has been skipped 
where nn is the num- 
ber of files (or 
records) remaining 
to be skipped 



SFILE, SREC 
terminates 
upon error 
condition 



P07 
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JC06 



JC07 



An irrecoverable t/0 


Job flushed 


P07,M01,P06 


error while compiling 


to next /JOB 




or assembling; or an 


directive 




error during a toad/go 






operation; or insuf 






ficent symbol table 






memory (insufficient 






/MEM directive), or 






an EOF was encountered 






before an END statement 






Invalid or illegal 


Ignore 


D01,D02,H06 


logical/physical-untt 


directive 




referenced in JCP 






directive 







A.5 LANGUAGE PROCESSORS 



A.5.1 DAS MR Assembler 

During assembly, the source statements are checked for 
syntax errors and usage. In addition, errors can occur 
where the program cannot determine the correct meaning 
of the source statement. 

When an error is detected, the assembler outputs an error 
code following the source statement containing the error, 
on the LO unit, and continues to the next statement. 

The assembler error messages are: 

Message Condition 

•IL First nonbiank character of the source statement 

invalid (statement is not processed) 

*OP Instruction field undefined (two no operation (NOP) 

instructions are generated in the object module) 

•SY Expression contains undefined symbol 

*EX Expression contains two consecutive arithmetic op 

erators 

•AD Address expression error 

•FA Floating-point number format error 

*DC An 8 or 9 in an octal constant 

•DO Invalid redefinition of a symbol or the location 

counter 

*VF Instruction contains variable subfields either 

missing or inconsistent with the instruction type 

*MA Inconsistent use of indexing and indirect addressing 

three symbolic source statements to be assembled 
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•NS 
*NR 
♦TF 

*SZ 

•UD 
•SE 

•E 

*R 

♦MQ 



Nested DUP statements 

Symbol table full 

Tag error (undefined or illegal index register 
specifications) 

Expression value too large for the size of the 
subfleld, or a DUP statement specifying more than 

Undefined digit in an arithmetic expression 

The symbol in the label field has, during pass 2, 
a value different than that in pass 1 

Syntax error (source statement incorrectly formed) 

Relocation error (relocatable item encountered 
where an absolute item was expected) 

Missing right quotation mark in character string 

Invalid use of literal 



Implicit indirect reference when I parameter is 
present on the /DASMR directive 



A.5.2 FORTRAN IV Compiler and Runtime 
Compiler 

During compilation, source statements are checked for 
such items as validity, syntax, and usage. When an error is 
detected, it is posted on the LO usually beneath the source 
statement. The errors marked T terminate binary output. 

All error messages are of the form 

ERR xx c(l)-c(16) 



where xx is a number form to 18 (notification error), or T 
followed by a number from to 9 (terminating error); and 
c(l)-c(16) is the last character string (up to 16) encoun- 
tered in the statement being processed. The right most 
character indicates the point of error and the @ indicates 
the end of the statement. The possible error messages are: 



Notification 
Error 



Definition 



Illegal character input 
Construction error 
Usage error 
Mode error 



Notification 




Error 


Definition 


4 


Illegal DO termination 


5 


Improper statement number 


6 


Common base lowered 


7 


Illegal equivalence group 


8 


Reference to nonexecutable 




statement 


9 


No path to this statement 


10 


Multiply defined statement 




number 


11 


Invalid format construction 


12 


Spelling error 


13 


Format statement with no 




statement number 


14 


Function not used as variable 


15 


Truncated value 


16 


Statement out of order 


17 


More than 29 named common 




regions 


18 


Noncommon data 


19 


Illegal name 


20 


DO index not referenced 


21 


Name is dummy 


22 


Array name previously declared 


23 


Exponent underflow or overflow 


24 


Undefined statement number 
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Terminating 
Error 



TO 

Tl 

T2 

T3 

T4 

T5 

T6 

T7 

T8 

T9 

T10 

Til 

T12 

T13 

T14 

T15 

T16 

T17 

T18 

T19 

T20 

T21 

T22 

T23 

T24 

T25 

T26 

T27 

T28 

T29 

T30 
T31 
T32 



Definition 



I/O error 

Construction error 

Usage error 

Data pool overflow 

Illegal statement 

Improper use 

Improper statement number 

Mode error 

Constant too large 

Improper DO nesting 

DO not parenthesized 

Item not operand 

Item not function 

Invalid unary + , 

Invalid hierarchy 

Invalid = 

Illegal operator 

Function statement without parameters 

Logical !f follows logical If 

Invalid dimensions 

Operand is not a name 

Too many numeric characters 

Non numeric exponent 

Terminator not 

Illegal terminator 

Not statement end 

Invalid common type 

Target statement precedes DO 

Subscript variable not dummy 

Not first statement 

(Title statement) 

First two characters not DO 

Not in subprogram 

Subscript not integer constant 



Message 

ARITH OVFL 
GO TO RANGE 

FUNC ARG 

FORMAT 
MODE 

DATA 
I/O 



Cause 

Arithmetic overflow 

Computed GO TO out of 
range* 

Invalid function argument 
(e.g., square root of 
negative number) 

Error in FORMAT statement* 

Mode error (e.g.. outputting 
real array with I format)* 

Invalid input data (e.g., 
inputting a real number 
from external medium with 
I format)* 

I/O error (e.g., parity, 
EOF)* 



* indicates fatal error; all others non-fatal 



A.5.3 RPG IV Compiler and Runtime 
Compiler 

During compilation, source statements are checked for 
such items as validity, syntax and usage. When an error is 
detected an arrow is printed pointing to the discrepancy in 
the source statement and an error message is output on 
the LO device. Detailed descriptions can be found in the 
RPG IV User's Manual (98 A 9947 03X). The possible error 
messages are: 



Note: due to optimization, the error message may appear 
on the next labeled statement and not on the actual 
statement error. 

RUNTIME 



Messages 



When an error is detected during runtime execution of a 
program, a message is posted on the LO device of the form: 



task name message 



Indicator 


Name 


Invalid 


Relational 


Label 


Size 


Literal 


Syntax 



Fatal errors cause the job to be aborted; execution 
continues for non fatal errors. The messages and their 
definitions are: 



If an I/O error occurs during compilation one of the 
following messages is posted on Logical Unit 15 and 
compilation is terminated: 
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Message 

RPOl.nnn 

RP02,rmn 
RP03,nnn 
RP04 

RP05 







Possible 






User 


Condition 


Action 


Action 


I/O error 


Compilation 
terminated 


H06 


End of file error 


Compilation 
terminated 


P07 


End of device error 


Compilation 
terminated 


P07 


End card error (End 


Compilation 


P07 


card encountered before 


terminated 




procedure card) 






Available memory 


Compilation 


M01.M03.M04 


exceeded 


terminated 





where nnn is the logical unit number on which the error 
occurred. 

RPG Runtime /loader during the loading or executing of an 
RPG IV object program in the background any of the 
following conditions will cause an error. The message is 
posted on Logical Unit 15 and the task aborted: 









Possible 








User 


Message 


Condition 


Action 


Action 


RTOl.nnn 


I/O error 


Task aborted 


H06 


RT02,nnn 


End of file error 


Task aborted 


P07 


RT03,nnn 


End of device error 


Task aborted 


P07 


RT04 


Program too big 


Task aborted 


907 


RT05 


Invalid object record 


Task aborted 


P08 


RT06 


Checksum error 


Task aborted 


P08 


RT07 


Sequence error 


Task aborted 


P08 


RT08 


Program not executable 


Task aborted 


P08 


RT09 


Work list overflow 


Task aborted 


M01,M02M03 
M04 


RTlO.xxxxxx 


Invalid call to sub 
routine or missing sub 
routine where xxxxxx 
= subroutine name 


Task aborted 


P08 
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Concordance Program: 

Message 

CN01 



Condition 
Symbol table full 





Possible 




User 


Action 


Action 


Partial con 


M01 


cordance out 




put, then next 




segment is 




processed 





A.6 LOAD-MODULE GENERATOR 



Message 
LGOl 

LG02 

LG03 
LG04 



LG05 



LG06 



LG07 



LG08 



LO09 



LG10 



LG11 



LG12 



Condition 

Invalid LMGEN directive 



Invalid or missing para 
meter m an LGMEN direc 
tive 

Checksum error tn 
object module 

READ error in object 
module 

WRITE error in load 
module loading 

Cataloging error, name 
already in library, 
library full 

Loader code error in 
object module 

Sequence error in object 
module 

Structure error in ob 
ject module (i.e.. non 
binary record) 

Literal pool overflow 
or use of literal or 
indirect by foreground 
program 

Invalid redefinition of 
common-block size during 
load-module generation 

Load-module size exceeds 
available memory or SW 
file size 



Action 

Ignore 

directive 

Ignore 
directive 



Possible 

User 

Action 

D01.D02 



D01.D02 



Abort loading P08.D02 



Abort loading P08.H06 



Abort loading P08.H06 



Abort loading D03.H06 



Abort loading P08 



Abort loading P08 



Abort loading P08 



Abort loading P08.P09 



Abort loading P08 



Abort loading P02.D34 
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LG13 



LMGE internal tables 
exceed available memory 



Abort loading 



M01 



LC14 



Number of overlay seg- 
ments input not equal 
to that specified in 
TIDB 



Abort loading 



D01.D02 



LG15 



LG16 



LG17 



LG18 



Undefined externals 


Loading 
continues 


P10 


No program execution 


Loading con 


P17 


address 


tinues. Ad 
dress defaults 
to the first 
location of 
the program 




Attempt to load pro 


Abort loading 


D01D02.D33 


tected task on back 






ground library or 






unprotected task on 






foreground library 






No load module 


Abort 


P08 


to catalog 


cataloging 





A.7 DEBUGGING PROGRAM 









User 


Message 


Condition 


Action 


Action 


DG01 


Invalid DEBUG direc 


Ignore 


D01,D02 




tive 


directive 




DG02 


Invalid or undefined 


Ignore 


D01.D02 




parameter in DEBUG 


directive 






directive 







A.8 SOURCE EDITOR 



Message 


Condition 


Action 


Possible 

User 

Action 


SE01 


Invalid SEDIT direc 
tive 


Directive 
ignored 


D01.D02 


SE02 


Invalid or missing para 
meter in SEDIT directive 


Directive 
ignored 


D01.D02 


SE03 


Error reported by IOC 
call 


Edit 
terminated 


H06 


SE04 


Invalid end of file 


Edit 
terminated 


P07 
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A.9 FILE MAINTENANCE 



Message 

FM01 

FM02 
FM03 
FM04 



FM05 



FM06 



FM07 



FM08 



Condition 

Invalid FMAIN direc 
tive 

Name already in direc 
tory 

Name not in directory 



Insufficient space for 
entry 

I/O error 



Directory structure 
error, including 
writing over the direc 
tory by direct ad 
dressing of an RMD 
partition 

Check-sum error in 
object module 

No entry name in ob 
ject module 



Action 


Possible 
User 

Action 


Ignore 
directive 


D01.D02 


Module not 
added 


D03,D01,D02, 
D07 


Module not 
deleted 


D03,D01 t D02 


Module not 
added 


D07,D08,D09 


FMAIN process 
terminated 


H06 


FMAIN process 
terminated 


H06 



FMAIN process 
terminated 

FMAIN process 
terminated 



P08 



P08 



FM09 



FM10 



FM11 



FM12 



FM13 



FM14 



Record-size error in 
object module 

Loader code error in 
object module 

Sequence error in ob 
ject module 

Non-binary record in 
object module 

Number of input logical 
unit not specified by 
INPUT 

Insufficient space in 
memory 



* Messages FM07 through FM14 apply only to the 
processing of object modules. The occurrence of any of 
these errors requires that the processing of the object 
module be restarted after the error condition is removed. 



FMAIN process 
terminated 

FMAIN process 
terminated 

FMAIN process 
terminated 

FMAIN process 
terminated 

FMAIN process 
terminated 



FMAIN process 
terminated 



P12 



P08 



P08 



P12 



D01,D02 



M01 
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A.10 I/O UTILITY 

Message 

IU01 

IU02 

IU03 

11)04 
lUOS.nn 



Condition 

Invalid IOUTIL directive 



Invalid or missing para 
meter in IOUTIL direc 
tive 

PFILE directive not used 
to open an RMD file 

I/O error 



END OF-FILE before the 
specified number or rec 
ords skipped. When 
nn ~ the n p »ber r f 
records remaining when 
the END-OF-FILE or 
END OF DEVICE (on RMD 
only) occurred. END 
OF TAPE outputs MSG 
where operator has op 
tion to ;RESUME or 
ABORT. Note: nn is 
module to 100. 



Action 

Directive 
ignored 

Directive 
ignored 



Directive 
ignored 

IOUTIL process 
terminated 

SFILE, SREC 
terminates 
upon error 
condition 



Possible 

User 

Action 

D01 r D02 



D01.D02 



D02 



H06 



P07 



A. 11 SORT ERROR MESSAGES 



Message 

STOl.xxxxxxxx 

ST02 
ST03 



ST04 



Condition 

Invalid or missing 
parameter or control 
word for the SORT 
control word xxxxxxxx 

Record lengths for 
INPUT and OUTPUT 
unequal and no user 
exit specified. 

SORT control field 
ending character po 
sition is less than 
start character position, 
or character position 
is past end of sort 
record 

Insufficient memory 
available for work 
space. 



Action 

Abort job D01 



Abort job 



Abort |ob 



D01 



D01 



Abort job 



M01 
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ST05, xxxxxx 



ST06.XXXXXX 



ST07,xxxxxx 



OPEN error on file 
xxxxxx 

I/O error on file 
xxxxxx 

Attempt to write past 
end-of-file xxxxxx 
(Work file or output 
file too small ) 



Abort job 
Abort job 
Abort job 



D01.H06 



H06 



D32 



A. 12 DATAPLOT 



Message 


Condition 


Action 


Possible 
User 

Action 


DPOO.xxxxxx 


Plot file overflow 


Incomplete 
plot 


D30 


DP01, xxxxxx 


Buffer overflow 


Incomplete 
plot 


M05 


DP02, xxxxxx 


Attempted to plot from 
unsorted plot file 


Abort plot 


P20 


DP03, xxxxxx 


End of-file detected 
before end of- plot 
indicator 


Incomplete 
plot 


P07 


DP04,xxxxxx 


Minimum/maximum x or 
y value exceeded 


Line will 
follow plot 
boundary, 
origin will 
be shifted 


P21 


DP05,xxxxxx 


PLOTS not called 


Abort plot 


P22 


DP06 t xxxxxx 


Data Rot t/O error 


Abort task 
xxxxxx 


H06.H05 


DP07.XXXXXX 


Attempted to sort from 
a non-RMD media 


Abort task 


D31 



where xxxxxx is the task name. 



A. 13 SUPPORT LIBRARY 

There are no error messages unique to this section of the 
manual. 
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A.14 REALTIME PROGRAMMING 

There are no error messages unique to this section of the 
manual. 



A.15 SYSTEM GENERATION 

RECORD-INPUT ERRORS: Errors in input record found 
before processing. 



Message 
SQOO 

SG01 

SG02 

SG03 



S004 



Condition 

Read error (I/O) 



Syntax error in 
SGEN directive 



Invalid or missing 
parameter in SGEN 
directive 

Syntax error in control 
record 



Invalid or missing 
parameter in control 
record 



Action 

Waits for 
corrected 
input 

Waits for 
corrected 
input 

Waits for 
corrected 
input 

Waits for 
corrected 
input 

Waits for 
corrected 
input 



Possible 

User 

Action 

P19.D11 



D01.D11 



D01.D11 



Dll 



D01.D11 



SQ05 



SG06 



SG07 



Binary object check 
sum error 



Binary-object sequence 
error 



Binary-object record 
code error 



Waits for 
corrected 
input 

Waits for 
corrected 
input 

Watts for 
corrected 
input 



P08.D11 



P08,D11 



P08.D11 



SG08 



Unexpected end of file, 
end of device, or 
beginning of device 



Waits for 
corrected 

input 



P07.D11 
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$009 



Improper ordering of 
load module-package 
control records 



OUTPUT ERRORS: Errors in the attempt to perform 1/0 
on an RMD or listing unit 



Waits for 
corrected 
input 



Dll 



Message 

SG10 



SG11 



SG12 



SG13 



SG14 



SG15 







Possible 






User 


Condition 


Action 


Action 


RMD I/O error in 


Waits for 


D12 


directive processor 


indicated 
corrective 
action 




RMD I/O error in 


Waits for 


D12 


nucleus processor 


indicated 
corrective 
action 




RMD I/O error during 


Waits for 


D12 


library generation 


indicated 
corrective 
action 




RMD I/O error during 


Waits for 


D12 


resident-task generation 


indicated 
corrective 
action 




First track on RMD bad 


Waits for 


D12 


(unable to write PS77 


indicated 




bad-track table) 


corrective 
action 




Write error on listing 


Waits for 


None 


device 


indicated 
corrective 
action 





SYSTEM-GENERATOR PROCESSING ERRORS: Errors pre 
venting the correct functioning of the system generator. 



Message 

SG20 



SG21 







Possible 






User 


Condition 


Action 


Action 


Requested SGEN driver 


System hafts 


M05 F D22,D18, 


not available 




D15 


Loading error in direc- 


Waits for 


D12 


tive processor 


indicated 
corrective 
action 
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SG22 



SQ23 



SG24 



SG25 



SG26 



SG27 



SG28,xx 



Loading error in 


Waits for 


D12 


nucleus processor 


indicated 
corrective 
action 




Loading error in 


Waits for 


D12 


library processor/ 


indicated 




resident-task 


corrective 




configurator 


action 




Stacks exceed avail 


Waits for 


M03.D12 


able memory 


indicated 
corrective 
action 




Incomplete system 


Waits for 


D01.D12 


definition (missing 


indicated 




directives) 


corrective 
action 




RMD error (too many 


Waits for 


D01.D25.D12 


sectors allocated, or 


indicated 




nonsequential par 


corrective 




tition assignments) 


action 




Error while loading 


System halts 


D15 


SGEN loader, I/O 






control, or drivers. 






Driver not found in 






SGL 






Error while loading 


Waits for 


P08.D12 


SGEN component 


indicated 




xx « 06 • checksum 


corrective 




06 sequence 


action 




07 record 






21 other in 






SGEN1 






22 other in 






SGEN2 






23 - other in 






SGEN3 






24 other in 






SGEN4 







MEMORY ERRORS: Errors of compatibility between alio 
cated memory and a portion of the VORTEX system. 









Possible 
User 


Message 


Condition 


Action 


Action 


SG30 


Size of nucleus larger 


Waits for 


M03.D12 




than that of defined 


indicated 






foreground area 


corrective 
action 




SG31 


Load module literal 


Current load 


P09.D17 




pool overflow 


module 
processing 
terminated, 
system con 
tinues 
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SG32 



Size of load module 
larger than defined 
memory area 



Current load 

module 

processing 

terminated, 

system con 

tinues 



M03.P02.D17 



SG33 



Invalid definition of 
common during toad 
module generation 



Current load 
module 
processing 
terminated. 

system con 
tinues 



M03.D17 



SG34 



Number of overlays in 
put not the same as 
specified by TID 
control record 



Current load 
module 
processing 
terminated, 
system con- 
tinues 



001, D17 



SYSTEM LOADING AND LINKING ERRORS: Errors that 
prevent normal loading or linking of system components. 



Message 

SG40 



Condition 

Loader code error in 
library processor 



Action 

Current load 

module 

processing 

terminated, 

system con 

tinues 



Possible 

User 

Action 

P08.D17 



SG41 



Loaded program contains 
no entry name 



Current load 
module 
processing 
terminated, 
system con- 
tinues 



P08.D17 



SG42 



Unsatisfied external in 
library processor 



Current load 

module 

processing 

terminated, 
system con- 
tinues 



P10.D17 



SG43 



SG44 



No execution address 
found in root segment 
or overlay 



Loader code error in 
nucleus processor (i.e. 
indirect or literal 
in foreground task) 



Processing 
continues. 
Address 
defaults to 
the first 
location of 
the program 

Waits for 
indicated 
corrective 
action 



Pll 



P08,D12, 
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SG45 



Unsatisfied external in 
nucleus processor 



Waits for 
indicated 
corrective 
action 



P10.D12 



SG46 



System peripheral 
assigned to more than 
one logical unit class 



Waits for 
indicated 
corrective 
action 



D12 



A. 16 SYSTEM MAINTENANCE 









Possible 








User 


Message 


Condition 


Action 


Action 


SM01 


Invalid SMAIN direc- 


Ignore 


D01.D02 




tive 


directive 




SM02 


Record not recognized 


Ignore 


P19.D10 






directive 




SM03 


Checksum error in 


Waits for 


P08.D10 




object module 


indicated 
corrective 
action 




SM04 


Incorrect size of 


Waits for 


P12.D10 




object module record 


indicated 






(correct: 120 words 


corrective 






for RMD input, other 


action 






wise 60 words) 






SM05 


Loader code error in 


Waits for 


P08.D10 




object module 


indicated 
corrective 
action 




SM06 


Sequence error in 


Waits for 


P08.D10 




object module 


indicated 
corrective 
action 




SM07 


Object module contains 


Waits for 


P12.D10 




non object module text 


indicated 






record 


corrective 
action 




SM08 


Error or end of device 


Waits for 


P07.D10 




received after reading 


indicated 






operation 


corrective 
action 




SM09 


Error or end of device 


Waits for 


P07,D10 




received after writing 


indicated 






operation 


corrective 

action 





A-21 



ERROR MESSAGES 



SM10 



Stack area full 



Waits for 
indicated 
corrective 
action 



M01 



SMI I 



Invalid control record 



Waits for 
indicated 

corrective 
action 



P19.D10 



A. 17 OPERATOR COMMUNICATION 









Possible 








User 


Message 


Condition 


Action 


Action 


OCOl 


Request type error 


Ignore 
directive 


D01 f D02 


OC02 


Parameter limits 


Ignore 


D01.D02 




exceeded 


directive 




OC03 


Missing parameter 


Ignore 
directive 


D01.D02 


OC04 


Unknown or undefined 


Ignore 


D01.D02 




parameter 


directive 




OC05 


Attempt to schedule 


Ignore 


D01.D02 




or time schedule 


directive 






OPCOM task 






OC06 


Attempt to declare OC 


Ignore 


D01,D02 




device or system 


directive 






resident unit down 






OC07 


Task specified in TSTAT 


Ignore 


D01.D02 




key-in has no es 


directive 





OC10 



ocn 



tablished TIDB, task 
currently not active 

Attempt to assign unit 
declared down or assign 
an unassignable logical 
unit/device 

Attempt to allocate 
TIDB unsuccessful for 
TSCHED request 



Ignore 
directive 



Ignore 
directive 



D19.H04 



M02 



A. 18 RMD ANALYSIS AND INITIALIZATION 



Message 

R201 



Condition 

Invalid RAZI direc 
tive or illegal sepa- 
rator or terminator 



Action 

Ignore 
directive 



Possible 

User 

Action 

D01.D11 
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RZ02 



RZ03 



RZ04 



RZ05 



RZ06 



RZ07 



RZ08 



RZ09 



RZ10 



RZU 



RZ12 



RZ13 



Invalid parameter in 
a RAZI directive 


Ignore 
directive 


D01.D11 


Insufficient or con- 
flicting directive 
information 


Ignore 
directive 


D01.D11 


New PST incompatible 
with the system 


Ignore 
directive 


D20.D21.D22, 

on 


Named device cannot be 
replaced (system RMD or 
device busy) 


Ignore 
directive 


001, Dll 


Irrecoverable I/O error 
on designated RMD 


Ignore 
directive 


H06 t DU 


First track of disc 

pack bad (pack unusable) 


Ignore 
directive 


D24 


Directive incompatible 
with specified RMD 


Ignore 
directive 


D25.D23 


Irrecoverable I/O error 
on system RMD (VORTEX 
nucleus) 


Ignore 
directive 


H06.D11 


I/O error on LO device 


Ignore 
directive 


D11.H06 


I/O error on SI device 


Ignore 
directive 


D11.H06 


No memory available to 
allocate for new bad 
track table 


RAZI aborted 


M02 


Total number of tracks 
specified in PRT direc- 
tive exceeds size of 
the device or is in 
compatible with the FRM 
directive 


Ignore 
directive 


D25.D11 



A. 19 PROCESS INPUT/OUTPUT 

There are no error messages unique to this section of the 
manual. 



A.20 WRITABLE CONTROL STORE 



A. 20.1 Microprogram Assembler 

During assembly the symbolic statements are checked for 
syntactic errors. In addition, a condition may occur where 
the assembler is unable to determine the correct meaning 
of the symbolic source statements. 



Either case is indicated as an error and up to eight error 
codes will be output beneath the source statement 
incorrectly constructed. 

NR, LC and IO errors terminate the assembly. 
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Each error code with the exception of 10 is followed by a 
space and two decimal digits indicating the character 
position the assembler was scanning when the error was 
detected. 

The error codes and their meanings are listed below: 



Error 
Code 

AD 



CC 
CE 
DD 

ER 
EX 

FN 



Meaning 

Address expression or associated 
fields in error 

Continuation not expected 

Numeric conversion error 

Illegal redefinition of a symbol 

Syntax error 

An expression contained an 
illegal construction 

Field number inconsistent with 
format 



10 
LC 

MF 
NR 

NS 

OP 
SE 

Sy 

sz 



I/O error 

Program location counter setting 
exceeds the maximum WCS page size 
(512 words) 

Duplicate field reference 

No memory available for addition of 
an entry to assembler's tables 

No symbol in the label field where 

required 

Operation field undefined 

Symbol in label field has a value 
during pass 2 that is different from 
the value determined in pass 1 

Undefined symbol. A value of zero 
is assumed 

A value too large for the size of a 
field, or the fields defined in a 
format statement do not equal 64 bits 



A.20.2 Microprogram Simulator 



Message 
MS01 

MS02 
MS03 

MS04 

MS05 

MS06 

MS07 
MS08 



Condition 

Input could not be interpreted 
as a valid command 

A non-hex character was 
encountered when hex expected 

Insufficient common 
area to contain spec 
ified number of pages 

The selected page 
number was not valid 



An attempt was made 
to jump to an unavail 
able WCS page 

A BCS instruction was 
encountered when WCS 
page 1 is unavailable 

Read error on Bl 
device 

EOF encountered before 
load complete 



Action 


Possible 

Usor 

Action 


Directive ignored; 
input recovery* 


D01.D02 


Directive ignored; 
input recovery* 


D02,D02 


Request for 
highest page 
repeated 


M01,D26 


Directive 
ignored; 
input 
recovery* 


D26 


Simulation 
halted 


P13 


Simulation 
halted 


D26.P13 


Loading 
aborted 


H06 


Loading 
aborted 


P07 
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MS09 



MS10 



MS11 



MS12 



MS13 



MS14 



MS15 



MS16 



MS17 



EOD/BEOD encountered 
before load complete 


Loading 
aborted 


Sequence error on Bl 


Loading 
aborted 


Invalid loader code 


Loading 
aborted 


Checksum error 


Loading 
aborted 


Undefined macro opcode 


Simulation 
continues 


Attempted to write to 
memory outside defined 


Simulation 
continues 


main memory 




Attempted to load out 
side main memory 


Loading 
aborted 


Invalid field name 


Remainder of 

directive 

ignored 


Invalid field value 


Remainder of 

directive 

ignored 



P08 



P08 



P08 



P08 



P15 



P16 



P23 



D01 



D01 



* Input recovery message or corrected directive from SO 
device. 



A.20.3 Microprogram Utility 









Possible 








User 


Message 


Condition 


Action 


Action 


MU01 


Input could not be 


Directive 


D01.D02 




interpreted as a valid 


ignored; 






command 


input 
recovery* 




MU02 


A non-hex character 


Directive 


D01,D02 




was encountered when 


ignored; 






hex expected 


input 
recovery* 




MU03 


EOF detected on SI 


Microprogram 

utility 

aborted 


P07 
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MU04 



MU05 



MU06 



MU07 



MU08 



MU09 



MU10 



MUtl 



MU12 



The selected page 
number was not valid 


Directive 
ignored; 
input 
recovery* 


001, D02 


Unable to access WCS: 
WCS is busy 


Directive 
ignored 


H05 


Unable to access WCS: 
BIC toad in progress 


Directive 
ignored 


H05 


Read error on BID 
device 


Loading 
aborted 


H06 


EOF encountered before 
load complete 


Loading 
aborted 


P07 


EOD/BOD encountered 
before load complete 


Loading 
aborted 


P08 


Sequence error on Bl 


Loading 
aborted 


P08 


Invalid loader code 


Loading 
aborted 


P08 


Checksum error 


Loading 
aborted 


P08 



* Input recovery message or corrected directive from SO 
device. 



A.21 VTAM NETWORK CONTROL MODULE 

The VTAM network control module (NCM) generates the 
following error messages: 



Message 

NC01 

NC02 
NC03 
NC04 
NCOS 
NC06 



Condition 
Syntax error 

Undefined tine 

Undefined TUID 



I/O error on file 
VT$DFL 

I/O error on file 
VT$DFT 

Undefined CCM number 



Action 

Ignore 
directive 

Ignore 
directive 

Ignore 
directive 

Ignore 
directive 

Ignore 
directive 

Ignore 
directive 



Possible 

User 

Action 

D01.D02 



D27.D02 
D27.D02 
H06 t D02 
H06.D02 
D27.D02 
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A.22 FILE MAINTENANCE UTILITY (FMUTIL) ERRORS 



Message 



Condition 



Action 



Possible User 
Action 



END-OFFILE 



A DIRECTORY 
STRUCTURE 
ERROR LUN lun 
SECTOR sector 

num 



This is an ERROR MSG 
meaning an END OF FILE 
was encountered before 
the specified request 
could be completed 

A = blanks 
lun = 4 digits giving 
logical unit number 
sector num = 7 digits 
giving the sector number 
in error This is an 
ERROR MSG. Meaning there 
is a structure error m 
the object module 



FMUTIL 
Process 

Terminated 



FMUTIL 
Process 
Terminated 



D01.P07 



H06 



HI.ENAME ERROR 


INVALID filename or 


No action 


D01.D07. 




filename not found 


taken error 
output and 
ignored goes 
to next entry 


D03 


DIRECTORY 


Directory error shows 


FMUTIL 


PI/ 


ERROR 


writing over the direc 


Process 




ERROR - 


tory by direct address 


Terminated 




Beg. end 


ing of an RMD partition 






eof 


~ blanks 






current 


Beg ■» 2 digits showing 






end eof 


beginning sector addr 

end - 2 digits showing 

the ending sector addr 

eof » 2 digits showing 

end of file addr 

current = 7 digits 

showing current beg 

addr 

end = 7 digits showing 

ending addr. of current 

sector 

eof = 7 digits showing 

current eof. 






TAPE INPUT 


READ ERROR (file Header 


Outputs error 


D01.D07. 


ERROR 


not found) 


tries again 


Dll 


PARTITION 


Insufficient space for 


Module not 


D07.D09. 


OVERFLOW 


entry into partition 


added, outputs 

last directory 
sector 


D01.D03 


INSUFFICIENT 


Insufficient space for 


File not added. 




SPACE IN 


entry 


FMUTIL process 


H06.M01 


PARTITION 




terminated 
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Message 



Condition 



Action 



Possible User 
Action 



FMAIN ERROR- 



CAPACITY 
EXCEEDED 



PARTITION 
SIZE sze 
SECTORS 

- - ■ num 



4 blanks and 1 digit 
reference to FMAIN 
ERROR indicated re 
quired I/O error. 



Insufficient space for 
entry to Directory. 



Partition size and 
sectors as stated in 
error message have not 
been assigned. 



ARE UNASSIGNED - blanks 

size = 7 digits showing 
size of partition, 
num = 5 digits show- 
ing number of sectors 
unassigned 



Outputs msg. 
FMUTIL process 
terminated, 
depending upon 
error mentioned 

Sorts entries 
in alphabetical 
order, and out 
puts listing. 

Returns to try 

again. 



H06 



M01 



P17.H06 



A.23 COMSY ERROR MESSAGES 

The following are the COMSY error numbers and associ 
a ted types of errors detected: 

Error Definition 

1 Directive not understood 







10 


2 


Missing directive. 


11 


3 


Input was not COMSY or FILE when 






searching for a named COMSY deck on PI 


12 


4 


Record sequence error on binary COMSY 
input. 


14 


5 


Record checksum error on binary COMSY 


15 




input 


16 


6 


Parameter list in error 


17 


7 


Missing COMSY directive on PI. 


18 
19 



Updates were not terminated by a COMSY 
directive 

Sequence number greater than 99999 on 
an update directive. 

Update sequence numbers not ascending 

COMSY deck specified, not on COMSY 
file on PI 

incorrect unit. 

Common decks limited to 19. 

Common deck not found. 

Update directive not understood. 

I/O error 

Erroneous end-of file condition. 

Directory error on a random file. 



A-28 



ERROR MESSAGES 



A.24 ERROR CODES 

A. 24.1 Errors Related to Directives 

D01 Check spelling, delimiters, and parameters. 

D02 Enter corrected request from OC or SO. 

D03 Check specified library for module name (FMAIN list). 

D04 Correct task priority. 

DOS Check PIM directives used at system generation. 

D06 Use a global logical unit in directive. 

D07 Use an alternate library or unit. 

D08 Increase library size with RA2I or during SGEN. 

D09 Delete unused modules from library. 

D10 Reposition record if PT or CR (for MT or RMD 
positioning is automatic and enter on SO: 

R@ to reread the record or where @ is a 
P@ to reread the program or carriage return 
/SMAIN@ to restart SMAIN 

Dll Correct input record by entering it on SO or 
indicate that it is positioned for rereading 
by entering C on SO. 

D12 Restart component by entering C on SO. 

(Repositioning is automatic for MT and RMD, 
for cards reload the entire deck and SGEN 
will find component.) 

D13 SGEN requesting bad track analysis for unformatted 
RMDs or reformat formatted RMDs. 

D14 Restart SGEN from beginning. 

D15 Check spelling, delimiters, etc of 10 
INTEROGATION. 

D16 Correct appropriate SGEN directives as indicated. 

D17 Correct indicated module for next SGEN or add 

corrected module with LMGEN after SGEN completes. 

D18 Check that all RMDs are included in the SYS 
directive that are indicated by the EQUIP 
directives. 

D19 Use OPCOM IOLIST for unit to check unit status 
(up or down) and unit's logical group. 

D20 Check PRT directive. 



D21 

D22 
D23 

D24 
D25 



Check if maximum number of partitions specified 
in EDR directive has been exceeded. 

Check for conflicts in controller/unit relations. 

Check logical unit in directive, must be assigned 
to first partition of the subject RMD unit. 

The specified RMD pack cannot contain a bad track 
table due to the first track being bad, use another 
pack. 

Check FRM directive and total number of tracks 
specified in PRT directive. The following 
table gives the track capacity for the standard 
RMDs: 



70-75XX 


4060 tracks 


7076X0 


203 tracks 


7076X3 


406 tracks 


70-7701 


128 tracks 


70-7702 


256 tracks 


70-7703 


512 tracks 



D26 

D27 

D28 
D29 

D30 

D31 

D32 
D33 



Check response to the highest page number 
requested. 

Check NDM definition or use LIST directive 
of NCM 

Use NCM module to check line/terminal status 

Check that all subject logical units assigned 
to RMD have been positioned with a PFILE. 

Use a larger file for the plot file. 

Check for proper logical unit (i.e., IOLIST). 

Increase work file xxxxxx size. 

Check type parameter on TIDB directive 



A. 24.2 Errors Related to Programs 

P01 Correct request in requesting task and re-execute. 

P02 Recode task using overlays. 

P03 Check for privileged or illegal instruction 

at specified location. Check listings or check 
memory by requesting a dump. 

P04 Check FCB or DCB entries. 

P05 Check for proper read mode, packed or 
unpacked. 

P06 Check for needed global files such as PO, 
SS, GO, SW. Note: the diagnostic gives 
the task name and not necessarily the missing 
file name 
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P07 Check source for an erraneous EOF, END directive, 
etc. 

P08 Check module for the indicated error; 

sequence number word 1, bits 7 

checksum value word 2 
Note: binary records can be listed using the DUMP 
directive of I0UTIL 

P09 Check $UT and $IAP values from the load module 
map 



P23 Check memory address, check ORG value and toad 
range 

P?A Recode into multi tasks or use fewer overlays 



A. 24.3 Errors Related to Memory Size 

M01 If background, adjust MEM directive as needed 



P10 Examine map for missing externals and make 
necessary program changes. 

Pll Check for an execution label on the END statement 
of the source. Note this is a normal diagnostic 
for FORTRAN overlays 

PI2 Check for a non binary record or a short or long 
record in the module The record length can be 
found in word 5 of the request block upon completion 
of I/O. 

P13 Check code and continue after making corrections 
as indicated 

PI 4 Check requested page number 

PI 5 Check opcode for valid instruction. 

PI 6 Check memory address, store request is ignored. 

PI 7 Check for specified instruction or operation at 

location indicated in error message. Note: the address 
indicated refers to the instruction causing the 
error and not the violated address. 

P18 Check the page status read /write, read only, 
fetch operand only, or unassigned 

PI 9 Check for illegal data under current mode, i.e., binary 
in ASCII record, non binary in binary record. 

P20 Sort the plot file 

P21 This may be an intentional message Plot continues 

P22 Call PLOTS. 



M02 Wait for foreground tasks to release 
memory or TIDB space. 

M03 If MEM request OK or cannot be increased then cut 
back on foreground common, empty TtDBs, reentry 
stack size, peripheral drivers, etc. by re SGEN. 

M04 If sharing blank common and VTAM LCB area, 
check that a program has not used part of the 
LCB area. 

M05 Increase buffer area with BSS or dimension commands. 
M06 Increase reentry stack size in SGEN EDR directive. 



A.24.4 Errors Related to Hardware 



HOI Make indicated unit ready. 

H02 Clear the protection of the unit. (Disc 
write protection or write ring in MT). 

H03 ABORT task, reassign SI if necessary, and then 
declare device down through OPCOM, do not 
forget to declare it back up again. 

H04 ABORT task and assign alternate device or 
declare device back up. 

H05 Check hardware for indicated problem 

H06 Check the OC device for an 10 error message, 
i.e., lOxx. 
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I/O DEVICE RELATIONSHIPS 



Mowabto Function* by I/O 0«<nc« Typ* 



Function 


RMD 


MT 


PT 


CR 


Read binary record 


X 


X 


X 


X 


Read alphanumeric record 


X' 


X 


X 


X 


Read BCD record 


x' 


X 


X 2 


X 2 


Read unformatted record 


X 1 


X 1 


X 


X 


Write binary record 


X 


X 


X 




Write alphanumeric 


X' 


X 


X 




record 










Write BCD record 


X 1 


X 


X 2 




Write unformatted record 


X 1 


X 1 


X 




Write end of file 




X 


X 




Rewind unit 


X 


X 


X 3 


X 


Skip one record forward 


X 


X 






Skip one record backward 


X 


X 






Perform function zero 






X 3 




Perform function one 










Perform function two 










Open a file with rewind 


X 


X 






option 










Open a file with leave 


X 


X 






option 










Close a file with leave 


X 


X 






option 










Close a file with update 


X 


X 






option 











CP 



LP 



MOTES 



,>M0 



TY or CRT 
X 4 



X* 
X 

X 4 



(1) All modes are read/written in binary 
mode. 

(2) BCD mode is handled like unformatted 
mode. 

(3) Punch 256 frames of leader on paper tape 
or eject one blank card on card punch. 

(4) All modes are written in alphanumeric 
mode. 

(5) Advances paper to top of form on line 



printer, or causes carriage return and feeds 
three lines on Teletype or CRT. 

(6) Advances paper one tine. 

(7) Advances paper two lines. 

(8) Ring* bell on Teletype or beeps on CRT. 

(9) 620-77 line printer - All modes are treated 
as alphanumeric. 

(10) 620-76 printer/ plotter - Unformatted rec 
ordt are transmitted without interpretation as 
plot data. 
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I/O DEVICE RELATIONSHIPS 



I/O Errors by I/O Device Type 













I/O Device 








Code 


Description 


RMD 


MT 


PT 


CR 


CP 


LP 


TY 


Of CRT 


000 


Unit not ready 


X 


X 


X 


X 


X 


X 




X 


001 


Device down 






















X 


002 


Illegal LUN speci 
tied 

























003 


FCB/DCB parameter 
error 


























004 Level program 
references a pro- 
tected partition 

005 Level program 
references pro 
tected memory 

006 I/O request error 

007 Read request to 
write only device, 
or vise versa 

010 File name not found 

01 1 File extent error 

012 RMD directory error 

013 Level program 
read a JCP (/) 
directive on SI 

014 Interrupt time out 

015 RMD cylinder search 
or malfunction error 

016 RMD read /write 
timing error 



017 


RMD address error 


X 




02 n 


BICn error 


X 


X 


030 


Parity error 


X 


X 



031 Reading error by 
card reader or 
paper tape device 

032 Odd length record X 
error 

X = Error reported by I/O drivers. 

O = Error reported by I/O control processor 
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APPENDIX C 
DATA FORMATS 



This appendix explains the formats and symbols used by 
VORTEX for storing information on paper tape, cards, and 
magnetic tape 



C.l PAPER TAPE 

Information stored on paper tape is binary, alphanumeric, 
or unformatted. It is separated into records (blocks of 
words) by three blank frames. The last frame of each 
record contains an end-ofrecord mark (13 4-8 punch). 



C.1.2 Alphanumeric Mode 

Alphanumeric information is stored with one frame per 
character (figure C 2). Standard ASCI i 8 punch levels are 
used. 



C.1.3 Unformatted Mode 

The tape is handled as for alphanumeric mode, but wtthout 
validity checking 



C.l.l Binary Mode 

Binary information is stored with three frames per 
computer word (figure CI). Note that channels 6 and 7 are 
always punched. 



C.1.4 Special Characters 

An end of file is represented by the ASCII 8 BELL character 
(12-3-8 punch). 




QXXQXXQXX 



QXXQXXQXX 
X XXXXXXXX 

XXXXXXXXX 
X XXXXXXXX 

XXXXXXXXX 



WORD I— 1 



WORD 2 



Q X X * BB BQXX 
* * B B B B * * 
' * B B B B ' * 
QXXBBB BQXX 
XXX + BBBXXX 



*. x 


x 


X 


* 


B 


B 


B 


X 


X x ^ 


Ix 


x 


X 


B 


B 


B 


B 


X 


X X 1 


( x 


X 


X 


* 


B 


B 


B 


X 


X X/ 



WORD 



n j j L 

EOR — J *— 



BINARY RECORD 



•—WORD I 
RECORD 
GAP 



V Til 1374 



* - HOLE 
B BLANK 
X :- DATA BIT 
LOR= END - OF - RECORD 
Q- BLANK 



Figure C-l. Paper Tape Binary Record Format 



CI 



DATA FORMATS 



When paper tape is punched on a Teletype, the ASCIIS 
ERROR character Mags erroneous frames punched by the 
Teletype when it is turned on or off This notifies the 
Teletype and paper tape reader drivers to ignore the next 
frame 

When alphanumeric input tapes are punched offline on a 
Teletype, there is no means of spacing the three blank 
frames after every record. The following procedure gives a 
tape that can be read by the paper-tape reader driver: 

a Punch the alphanumeric statement 

b Punch an end of record (RETURN on the Teletype 
keyboard). 



NOTE 

Any of these characters can also be used for leader 
and trailer. 



d Punch the next alphanumeric statement Return to step 
b 



C.2 CARDS 

Information stored on cards in binary, alphanumeric, or 
unformatted Each card holds one record of information 
Hence, there is no end-of record character for cards. 



Punch three or more frames containing any of the 
following characters 



Press CONTROL and: 



ASCIIS Equivalent 



@ 




DCO 


LINE FEED 




LINE FEED 


WRU 




WRU 


EOT 




EOT 


RU 




RU 


VT 




VTAB 


TAB 




HTAB 


HERE IS (33 ASR 


only) 


NULL 



C.2 1 Binary Mode 

Binary information is stored with sixty 16 bit words per 
card. The information is serial with bit 15 of the first word 
in row 12 of column 1, bit 14 in row 11, etc. (figure C 3). 
Any 1 1-0 punch in column 1 is treated as binary. 



C.2.2 Alphanumeric Mode 

Alphanumeric information is stored one character per card 
column (figure C 4) using the standard punch patterns 



CHANNEL 



flMJNG 

3 




X X X X X 

X X X X X 

X X X X X 

X X X X X 

X X X X X 

X X X X X 

X X X X X 



X X 


* B B B 


X X 


X X 


B B B B 


X x 


X X 


B B B B 


x >. 


X X 


B B B B 


x x 


X X 


* B B B 


X X 



s X 


X 


* 


B 


B 


B 


X 


X 


I X 


X 


B 


B 


B 


B 


X 


X 


f * 


* 


* 


B 


B 


B 


* 


_J 



L - ASCII CHARACTERS— 1 
EOR 
ALPHANUMERIC RECORD- 



J L 



•—ASCI 
RLCORD 
GAP 



CHARACTERS OP 
BINARY WORD 



' HOLE FOR ASCII CHARACTER OR DATA BIT FOR 

BINARY INFORMATION 
B BLANK 
X DATA BIT 
tOk END-OF-RECORD 



Figure C-2. Paper Tape Alphanumeric Record Format 
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DATA FORMATS 



WORD; 



********* 



0Q|O 

i ? 
I 1 



222 

33 

4|4 4 

5 



VTii'isn 



********* 



00 



1 111 

522 



444 



33 
4)4 



5555 



66 



OHIO 
s i 



1 t 



* * * 

* * * 



j0 DO 

1 10 II 



22 
33 
4 4 

55 
666 



7 7 

8 5 
99 9 



QOOOOOOOQOQOOOOQOJ 

u u i<i i, i) n :~ o n /: ;-i n ;■ 

iiililiiiiniin 

22 2 22 2 22 2 2 2 ? ? 2 2 
3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 1 
4444444444444444 4, 
555555555555555 
666666 £ 6 56666 66 6 
77777 777 777777 M 

8 8 8 8 8 8 8 8 8 8 B 8 8 8 E 

9 9 9 9 9 9 9 9 S ? 3 9 9 9 9 9 9 

n i* i j it i! m ii r 1 i~ r. :: }* : , :i n it 11 : 

siatoaHO t ;■ ■ a sea 



Figure C 3. Card Binary Record Format 




yn 14*37 



Figure C-4. Card Alphanumeric Record Format (IBM 026) 
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DATA FORMATS 



C.2.3 Unformatted Mode 

The data are handled, one column per computer word, 
right-justified, and without validity-checking. 



C.4 STATOS PRINTER/PLOTTER 

Information may be output to the States printer/plotter in 
alphanumeric and unformatted modes. 



C.2.4 Special Character 

An end of file is represented on cards by a 2-7-8-9 punch in 
column 1 of an otherwise blank card. 



C.3 MAGNETIC TAPE 

Information stored on seven-track magnetic tape is either 
binary or BCD. On mne-track tape, information is always 
binary. ~" ~— *"* 



C.4.1 Alphanumeric Mode 

Information output in alphanumeric mode is assumed to be 
ASCII characters packed two to a word. Each character is 
converted to a dot matrix and the print line is transmitted 
to the device. Characters may be printed in two sizes. The 
normal print size consists of a 7 by 11 dot matrix and 
allows 140 characters per line. The targe size print consists 
of a 14 by 22 dot matrix and allows 70 characters per line. 
Excess characters wilt be truncated. 



C.3.1 Seven-Track 

For system-binary, ASCII, and unformatted modes, the first 
frame is read into bits 15 12 of the word, the second frame 
into bits 11-6, and the third into bits 5 0. For BCD mode, 
the first frame is read into bits 11-6 and the second into 
bits 5 0. 



C.3.2 Nine-Track 

In all modes, the first frame is read into bits 15-8 of the 
word, and the second frame into bits 7-0. 



C.4.2 Unformatted Mode 

Information output in unformatted mode is assumed to be 
plot data. The information is truncated after n words and 
transmitted to the device without conversion. Each 1 bit 
transmitted will cause a dot to be printed on the output 
line. The most significant bit of the first word is transmit- 
ted to represent the left-hand dot position on the line. 



"n" depends on the bed width of the plotter. See section 
20.3.3 for specific value. 
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APPENDIX D 

STANDARD CHARACTER CODES 



IBM 026 Punch 




Symbol 


ASCII 


i 


375 


-> 


276 




272 


• 


247 


= 


275 


- 


337 


9 


271 


8 


270 


; 


267 


6 


266 


5 


265 


4 


264 


3 


263 


2 


262 


1 


261 


(blank) 


240 


& 


246 


< 


274 


| 


333 


) 


251 




256 




277 


! 


311 


H 


310 


G 


307 


F 


306 


e 


305 


D 


304 


c 


303 


B 


302 


A 


301 


+ 


253 




245 


; 


273 


1 


335 


- 


252 


$ 


244 




241 


R 


322 


Q 


321 


p 


320 





317 


N 


316 


M 


315 


I 


314 


K 


313 


J 


312 




255 


a 


243 


\ 


334 


" 


242 


( 


250 



lollerith 


10 


68 


58 


48 


38 


28 


9 


8 


/ 


6 


5 


4 


3 


7 


1 


(blank) 


110 


12 6 8 


1258 


12 4 8 


12 38 


12 2 8 


129 


128 


12 7 


12 f> 


12 5 


124 


12 3 


12 2 


12 I 


12 


1178 


1168 


1158 


114 8 


1138 


1128 


119 


118 


117 


116 


115 


11 4 


11 3 


11 2 


111 


11 


078 


068 


0-5-8 


048 



IBM 029 Punch 
ASCII 

242 
275 
247 
300 
243 
272 
271 
270 
26'/ 
266 
265 
264 
263 
262 
261 
240 
375 
253 
250 
274 
256 
333 
311 
310 

307 

306 

305 

304 

303 

302 

301 

246 

334 

273 

251 

252 

244 

241 

322 

321 

320 

317 

316 

315 

314 

313 

312 

255 

277 

276 

337 

245 



Symbol 



6 
5 

4 

3 

1 
(blank) 



Dl 



STANDARD CHARACTER CODES 





IBM 026 Punch 






IBM 029 Punch 




Symbol 


ASCII 


Hollerith 


ASCII 


Sj 






254 


3 8 


254 




(a) 




300 


? 8 


33b 


1 


2 




332 


0-9 


332 


/ 


Y 




331 


08 


331 


Y 


X 




330 


07 


330 


X 


W 




327 


06 


327 


W 


V 




326 


0-5 


326 


V 


u 




325 


4 


325 


LI 


T 




324 


0-3 


324 


T 


S 




323 


02 


323 


S 


'' 




257 


1 


257 


/ 







260 





260 






Symbol 



D2 



APPENDIX E 

ASCII CHARACTER CODES 



Character 


Internal ASCII 


Character 


Internal ASCII 





260 


R 


322 


1 


261 


S 


323 


2 


262 


T 


324 


3 


263 


U 


325 


4 


264 


V 


326 


5 


265 


w 


32/ 


6 


266 


X 


330 


7 


267 


Y 


331 


8 


270 


z 


332 


9 


271 


(blank) 


240 


A 


301 




241 


B 


302 


" 


242 


C 


303 


# 


243 


D 


304 


$ 


244 


F 


30b 




24 b 


F 


306 


A 


246 


G 


307 


' 


247 


H 


310 


{ 


250 


1 


311 


) 


251 


J 


312 


* 


252 


K 


313 


+ 


253 


L 


314 


, 


254 


M 


315 


- 


25b 


N 


316 


* 


256 





317 


/ 


257 


P 


320 




272 


Q 


321 




273 


< 


274 


FORM 


214 




275 


RETURN 


215 


^> 


276 


SO 


216 




2/7 


SI 


217 


(a 


300 


DCO 


220 




333 


XON 


221 




334 


TAPE AUX 






33b 


ON 


222 


i 


375L 


X-OFF 


223 


- 


33/ 


TAPE on 




RUBOUT 


3// 


AUX 


224 


NUl 


200 


ERROR 


225 


SOM 


201 


SYNC 


226 


EOA 


202 


LEM 


227 


EOM 


203 


SO 


230 


EOT 


204 


SI 


231 


WRU 


205 


S2 


232 


RU 


206 


S3 


233 


BEL 


207 


S4 


234 


FE 


210 


S5 


235 


H TAB 


211 


S6 


,: 36 


LINE FEED 


212 


S7 


237 


V TAB 


213 







APPENDIX F 

VORTEX HARDWARE CONFIGURATIONS 





Device 




Interrupt 






Device 


Address 


Interrupt 


Address 


BIC 


Comments 


73-3300 


046 


MP halt error 


020 


n/a 


Wired as system 


Memory 




MP I/O error 


022 


n/a 


priority 1 


Map 




MP write error 


024 


n/a 








MP jump error 


026 


n/a 








MP unassigned 


030 


n/a 








error 












MP instruction 


032 


n/a 








fetch error 












MP write and 


034 


n/a 








overflow error 












MP jump and 


036 


n/a 








overflow error 








Power 




Power failure 


040 


n/a 


Wired as system 


Failure/ 




Power restart 


042 


n/a 


priority 2 


Restart 












Real-Time 


047 


RTC variable 


044 


n/a 


Wired as system 


Clock 




interval 






priority 4 






RTC overflow 


046 


n/a 


Base timer inter- 
val rate is 100 
microseconds; 
free-running clock 
rate is 100 micro 
seconds 


Priority 


040-043 




01000277 


n/a 


Wired as system 


Interrupt 










priority 5; assign 


Module 










ments should be 


(PIM) 










from fastest to 
slowest 

Addresses 064 
067 available for 
special use 


Special 


044 




n/a 


n/a 


PIMs modified to 


PIM 










enable/disable 


Instruction 










with EXC 044 


Butter 


020-026 


BIC complete 


0100-0277 


n/a 


AH wired as sys 


Interlace 


070-073 








tern priority 3 


Controller 












(BIC) or 










Addresses 070 


Block Transfer 








073 available 


Controller (BTC) 








for BIC5 and 












BIC6 others 












created for spe 












cial use 



VORTEX HARDWARE CONFIGURATIONS 



Device 



Device 
Address 



Interrupt 



Interrupt 
Address 



BIC 



Comments 



Disc 
Memory 



Disc 
Memory 



Magnetic 
Tape 



70 7 702 
70 7 703 


620 4/ 
48, 49 
Drum 43C. 
D Disc 
Memory 


014 


BIG complete 


(;100 0?// 


Yes 


RMD assigned to 
Highest system 
BtC (no other 
devices can be 
so assigned) 


70 7600 
707610 


62037. 
36 Disc 
Memory 


016017 


BIC complete 
Cylinder 

search com 

pfete 


0100 027/ 

01000277 


Yes 


RMD assigned to 
highest system 
BtC (no other 
devices can be 
so assigned) 


707603 
70 7613 


Mode* F 

Disc 

Memory 


015017 


BIC complete 

Cylinder 
search com 
plete 


0100 0277 

01000277 


Yes 


RMD assigned to 
highest system 81 C 
(no other devices 
can be so assigned) 


70 7500 


62035 

Disc 

Memory 


015 


BIC complete 
Cylinder 

search com 

plete 


01000277 
010002/7 


Yes 


RMD assigned to 
highest system 
BTC (no other 
devices can be 
so assigned) 


707510 


62034 

Dtsc 

Memory 


01501/ 


BIC complete 
Cylinder 

search com 

plete 


0100 0277 
0100 0277 


Yes 


RMD assigned to 
highest system 
BTC (no other 
devices can be 
so assigned) 


707100 


62030 
31A, 




Tape motion 
complete 


0100 0277 
0100 02 77 


Yes 





31B, or 
31C, 32 
Magnetic 
Tape Unit 



Card 
Reader 



706200 



62025 

Card 

Reader 



030 



BtC complete 



0100 02/7 Yes 



Printer/ 
Plotter 



70 6602 



62075 
Statos 
Printer/ 
plotter 

70-7702 

70-660x 

Statos 

Printer/ 

Plotter 



035-036 



035-036 



BtC complete 
PC not busy 



BtC complete 
PC not busy 
Statos not 
busy 



01000277 Yes 



0100 1077 
0100 0277 
0100 0277 



Yes 



Interrupt event 
words should be 
(H for BtC. 02 
for Statos, and 
04 for PC 



Line Printer 



620 77 

Line 

Printer 



035 036 



BIC complete 



010002/7 Yes 



F2 



VORTEX HARDWARE CONFIGURATIONS 



Device 






Device 
Addrest 


Interrupt 


Interrupt 
Address 


BIC 


Comments 


Card 
Punch 


70 6201 


62027 

Card 

Punch 


031 


BIG complete 


0100 0? 77 


y t ». 




Paper 

tape 

System 


70-6320 


62055, 
55A 
Paper 
Tape 
System 


037,034 


Character 
ready 


01000277 


No 




Teletype 


70 6100 
70-6104 

706400 


6206, 
7, Q 
Teletype 

CRT with 

E2184 

Controller 


001 007 


Read buffer 

ready 
Write buffer 

ready 
Read buffer 

ready 
Write buffer 

ready 


01000277 
0100 0277 
0100 0277 
0100-0277 


No 
No 


Event 1 - READ 
Event 2 » WRITE 

Compatible with 
Teletype (Eyaal^l -- 
READ, Event 2 « 
WRITE) ~ " 






Front 
Panel 






0001 


No 


Wired as system 
priority 6; not 
used by VORTEX 




73-4000, 

-4001, 

4002 


070074 


n/a 


n/a 




No 


Only one device address is 
used in a given system. 




WCS512 
Words 












Mulliple WCS pages use 
the same device address 



NOTES 



(1) The priority look ahead option is required if 
there are more than eight pf iority devices in the 
system. 



(2) PIM assignments are arranged from the 
fastest devices to the slowest. 



APPENDIX G 

OBJECT MODULE FORMAT 



Object modules generated by the VORTEX language 
processors result from assembly or compilation. The 
modules are input by the load-module generator and are 
bound together into a load module. 

The first record of the module contains the size of the 
program, an eight-character identification, and an eight 
character date. Entry name addresses, if any, appear as 
the first data field items of the object module. 



G 1 RECORD STRUCTURE 

Object module records have a fixed length of sixty 16 bit 
words Wowl. 1 is thp record conlroLaoid.. Word 2 contains 
the exclusive OR check sum of word 1 and words 3 to 60. 
Words 3 to 1 1 can contain a program identification block 
( opttonal) Words 12 to 60 (or 3 to 60 if there is no program 
identification block) contain data fields 

Table G 1 illustrates record control word formats. 



G.2 PROGRAM IDENTIFICATION BLOCK 

The program identification (ID) block appears in words 3 to 
1 1 of the starting record of each module. Word 3 contains 
the program size, words 4 to 7 contain an ASCII eight 
character program identification, from the TITLE state 
ment, and words 8 to 11 contain an ASCII eight-character 
date. 



G.3 DATA FIELD FORMATS 

Data fields contain one , two-, three , or four word entries. 
One word entries consist of a control word; two-word 



entries consist of a control word and a data word, three 
word entries consist of a control word and two data words, 
and four-word entries consist of a control word, two name 
words, and a data word. Data words can contain instruc 
tions, constants, chain addresses, entry addresses, and 
address offset values. 



Table G-l. Record Control Word Format 
Bit Binary Value Meaning 



15 





13 14 


i 
11 




00 10 


12 





11 





10 


1 




9 





8 







I 



07 



Verify check sum 
Suppress check sum 
Binary record 
Nonbinary record 
First record of module 
Not the first record 
Last record of module 
Not the last record 



Not a relocatable module (absolute) 
Relocatable module / 
Sequence number (modulo ?bh- 



G.4 LOADER CODES 

Loader codes, which have the following format, are urn -<ng 
the data in an object module 



15 



14 13 12 11 10 9 



8 7 6 



5 U 3 



2 1 



Code 
Code Values 

oo 

01 
0/ 

03 



Subcode 



Pointer 



Name 



Meaning 

Refer to subcode for specify action 

Undefined 

Add the value of the selected pointer to the 
data word before loading. 

Add the value of the selected pointer to the 
first data word (literal value) and enter the 
sum in the direct literal pool if bit 11 of 
the second data word is zero. Otherwise, 
enter it in the indirect literal pool. Add 
the address of the literal to the second data 
word before loading, 



OBJECT MODULE FORMAT 



Code Values 

04 



Meaning 

Load the data word(s) absolute Bits 12 through 
indicate the number of words minus one (ni) to 
load. 



05-07 



Undefined. 



Subcode Values 

00 

01 
02 



Meaning 

Ignore this entry (one word only) 

Set the loading address counter to the sum of the 
specified pointer plus the data word. 

Chain the current loading address counter value 
to the chain whose last address is given by the 
sum of the selected pointer plus the data word 
Stop chaining when an absolute zero address is 
encountered. 



03 



Complete the postprogram references by adding to 
each address the sum of the selected pointer plus 
the data word 



04-06 
07 

010 



Undefined. 

Set the program execution address to the sum ol the 
values of the selected pointer plus the data word 

Define the entry name with entry location as equal 
to the value of the selected pointer plus the data 
word. 



on 



012 



013 



Define a region for the pointer whose size is given 
in the data word. If the entry name is not blank, 
define the entry point as the base of the region. 

Enter a load request for the external name. The 
chain address is given by the sum of the selected 
pointer plus the data word 

Enter the loading address of the external name »n 
the indirect literal pool. Add the address of the 
literal plus the value of the selected pointer to 
the data word (command) before loading 





014017 




Undefined 




Pointer 


Values 


Meaning 




00 




Program region. 




01 




Postprogram region 




02 




Blank common region 




03036 




Labelled COMMON regions. 




037 




Absolute (no relocation). 


Name Format 









Names are one to six (six bit) characters, starting in bit 3 
of the control word and ending with bit of the second 



name word. Only the right 16 bits of the two name words 
are used 
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OBJECT MODULE FORMAT 



G.5 EXAMPLE 

The following is a sample background program with the 
description of the object module format after the assembly 
and the core image after loading 



G.5.1 Source Module 





NAME 


SUBR 




EXT 


BBEN 


SUBR 


ENTR 






LDA* 


SUBR 




CALL 


BBEN 




STA 


TIME 




JAN 


DONG 




LDA 


-2 




CALL 


BBEN 


DONG 


INP 


SUBR 




JMP* 


SUBR 


TIME 


BSS 

END 


1 



G.5.2 Object Module 

>MMOO Record control word (first and last record, verify check sum 

sequence number 0) 

l-)/631 Checksum word. 

(Begin program ID block) 

000OI6 Program size (exclusive <f FORTRAN COMMON, literals and 

direct address pointers) 



4? 730 Identification in ASCII (assume this program was labeled 



M.-'/ If) 
1 S0314 

1 41263 
126661 

1 m?h5 
i U2 71 



f XAMPLE) 



Date of (roation in ASCI' 'assume assembled 03 lOb'^i 



(End program ID block) 

10000 Define enl'y name SUBR at relative (code • subo>!t* ( 

1)0(364/ pointer 0. name SUBR, and data word 0) 

0'>4262 

0OOO00 



luoooo 
oooooo 



Inter ihsi lute d<da word in menioiy at rel.V'VP 



0*j 0000 t'nter literal (indirectly addressed relative 0} m mdire< * 

100000 pointer pool, add address of pointer to load 017000 and en 

0I7(H)0 ter memory at relative 1 



1 00000 Inter absolute data word 02000 in memory at relative 2 

no, '000 



OBJECT MOOULE FORMAT 



Q4 



100000 
000000 



Enter absolute data word 000000 in memory at relative 3 



100000 
054010 



Enter absolute data word 054010 in men.ory at relative 4 



100000 
001004 



Enter absolute data word 01004 in memory at relative 5 



040000 
000012 



Enter relative data word 012 in memory at relative 6 



060760 Enter literal (absolute 2) into literal pool, add address of 

000002 literal to load command 010000, and enter in memory at relative 

010000 7. 



1 00000 
002000 



Enter absolute data word 02000 in memory at relative 010 



040000 
000003 



Enter relative data word 03 in memory at relative Oil 



060000 Enter literal (relative 0) tnto indirect pointer pool, add 

000000 address of literal to increment command 047000, and enter 

047000 memory at relative 012. 



100000 
001000 



Enter absolute data word 01000 in memory at relative 013 



040000 
100000 



Enter relative data word 0100000 in memory at relative 014 



001000 



Set loading location for next command, if any, to relative 
016. 



012003 
000212 
024556 
000011 



Entef load request for external name BBEN and chain entry 
address to relative Oil. 



(The remaining words of this record contain zero) 



OBJECT MODULE FORMAT 



G.5.3 Core Image 

Assume the program originates at 01000, fre, literal pool 
hmits are 0500 0777, and BBEN is loaded at 01016. 



0500 
0501 



101000 
001000 



DATA 
DATA 



♦01000 
1000 



0777 



000002 



DATA 



01000 


000000 


BNTR 





01001 


017500 


LDA* 


0500 


01002 


002000 


JMPM 




01003 


001016 




01016 


01004 


054010 


STA 


01015 


01005 


001004 


JAN 




01006 


001012 




01012 


01007 


010777 


LDA 


0777 


01010 


002000 


JMPM 




01011 


001016 




01016 


1012 


047501 


INR* 


0501 


01013 


001000 


JMP 




01014 


101000 


* 


01000 


01015 




BSS 


1 


01016 




BSS 


1 






The following six bit codes are used by the load module 
generator in building load modules. The codes define 
names created by NAME, TITLE, and EXT directives. 



Character 


Octal 


Character 


Octal 


Character 


Oct 


(& 


40 


V 


66 


+ 


13 


A 


41 


w 


67 




14 


B 


42 


X 


70 


- 


15 


C 


43 


Y 


71 


' 


16 


D 


44 


Z 


72 


i 


17 


t 


45 


1 


73 





20 


r 


46 


\ 


74 


1 


21 


G 


47 


] 


75 


2 


22 


H 


50 




76 


3 


23 


1 


51 


- 


77 


4 


24 


J 


52 


(blank) 


00 


5 


25 


K 


53 


i 


01 


6 


26 


I 


54 


ti 


02 


7 


27 


M 


55 


n 


03 


8 


30 


N 


56 


$ 


04 


9 


31 


O 


57 


% 


05 




32 


P 


60 


L 


06 


; 


33 


Q 


61 


' 


07 


< 


34 


R 


62 


( 


10 


- 


35 


S 


63 


) 


11 


> 


36 


T 


64 


* 


12 


? 


37 


U 


65 











G5 



OBJECT MOOUtE FORMAT 



G.6 END LOAD RECORD 



An end load-module record is used to terminate one or 
more object modules which comprise a root or s equent of a 
load module. This record is processed fomulariy to an end 
of file indication by LMGEN, however, more thanNwie end- 
load module record may be present on an RMD file-, 



w 



The form of an end -load -module record is a binary record 
in which the first word has the value 077000 and all other 
words are zero. 



Sj' 



G6 



